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LABEL O00000000LPAPRNTO01761779USER=SPO 3 EXECUTE coPY SPO 


4000 %PL 78 


FILE SNOBOL/ MANUAL FRI 6/25/76 06314PM 


FOR 8 LINES/INCH, ” 


2000 85500 SNOBOL3 MANUAL. * 


3000 


bce ret 0 


p00 
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8000 


9000 
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44000 
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40000 4, 
W000. 
42000 5, 


vf O900 


| 47000 — 
48000 
cee 49000 
50000 
51000 


vat. ” o-vel «. 


EXP! 
Sal 


3. 2.34 FUNCTION CODE. 


WING DE NaNeee ue 
RY POINTS, 


E ONS. Q 
+ NAMES. ANO VALUES 
Salele LITERALS, 
5.1.2. NAMES 

SeleSe, INDIRECTION, 
CONCATENATION« 

» FUNCTION CALLS, 

« ARITHMETIC. 

5.4.1, DIVISION MODES, 

5.4.2. FAILURE OF ARITHMETIC. 
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| 69000. - 
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53000 
54000 


BEB OONO ccc 
--§6000 ~ 
57000 


58000 


Eoega 


60000 


61000 
62000 
- 63000. 
64000. 


20 
55005 


66000 
67000 


71000 
72000 


73000 


74000 


75000. 


76000 


77000 
78000 


Eee aR 


80000. 


2 B6000. 


ee 
2 Be000 
83000 


84000 
85000 


B7000- 
88000 


“69000 


90000 
91000 


92000. 


93000 


GA000 
95000 
96000 


97000. 
98000 
IMPLEMENTED. ON THE BURROUGHS B5500 aT THE UNIVERSITY OF WISCONSIN 


99000 


190000. 


101000 


he O OOo... 


102000 


404000. 


105000. 


106000. 


107000 
108000 


544,38 ARITHMETIC FUNCTIONS, 
5 e4e4e ADDITIONAL COMMENTS ON ARITHMETIC, 

6, PATTERNS. 
Get. CONSTANT PATTERN ELEMENTS, 
—Oe20 STRING. VARIABLES + 

6.2015 ARBITRARY STRING VARIABLES, 

be et + @e BALANCED STRING VARIABLES. 
ete BACK REFERENCES, 
4a PATTERN MATCH MODES, 
665. ASSTGNMENT OF STRING VARIABLES. 
o66 PATTERN MATCH ALGORITHMs 
GO-TO PARTS» LABELS. 

ell LABELS» 
7e25 SIMPLE GO=TO PARTS. 
7¢3- RESERVED LABELS, 
7.4. COMPUTED GO-TOS. 
(Te55 ERRORS IN GO"TO. PARTS, 
be FAILURE. Be L 

Bets CAUSES OF FAILURE. on 
Bade ORDER OF EXECUTION. a es 

9» INTRINSIC FUNCTIONS,» 


Pe 


ND AX AOR 


10. INPUT/OUTPUT es 0 0 : : i 


“10,1. 1/0 STRINGS». 
“40.26 OREN AND CLOSED FILES. 
10,3. STANDARD I/O STRINGS. 
10,4, TELETYPES, 
TO gh le. TELETYPE INPUT AND QUTPUT, 
—40eh4e2e TELETYPE WAITING TIMES. 
~4004.3- TELETYPE ADDRESSES. © 
“1004s 4, SPECIAL CHARACTERS FOR THE TELETYPE. 
10.5, CAUSES OF I/O, 
11. DEBUGGING AIDS. 

iis al, TRACING. 

Lde2e INTERACTIVE DEBUGGING. 
12,° MISCELLANEQUS. 
APPENDIX. Ae BNF DEFINITIONS FOR SNOBOL3. 


“APPENDIX Be BNF NOTATION, 


APPENDIX C. B5500 CHARACTER SETs 
APRENDIX De RUNNING JOBS FROM A TELETYPE. 
INDEX 6 oo Ce es: es : 


SECTION oe 
APAGE 1 
1, INTRODUCTION 


“THIS: MANUAL “DESCRIBES THE PROGRAMMING LANGUAGE SNOBOL3> AS 


-CMADISON) BY JOHN Ms CHAMBERS, WITH MUCH HELP IN IN THE DESIGN AND 
INITIAL CODING STAGES BY WILLIAM KRUEGER» AND SOME HELP IN WRITING 

THE COMPILER BY DAVID WILSON. 

THE. VERSION OF SNOBOL3 DESCRIBED HERE 1S BASICALLY IDENTICAL 

WITH. THE LANGUAGE DEVELOGPED AT BELL LABS» WITH THE OBVIOUS DIFFERENCES 
OF. ‘CHARACTER SET AND I/O FACILITIES. CTHERE IS ALSO A SLIGHT PROBLEM 
WITH DIVISTON* CAUSED BY THE FACT THAT THE B5500 HARDWARE ROUNDS 
QUOTIENTS» WHILE MOST OTHER MACHINES TRUNCATEe SEE THE SECTION 

ON ARIJTHMETICe) THERE AREs AS USUAL» A NUMBER OF "EXTENSIONS", 
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109000: 


119000 
111000 


112000 
113000 
114000: 


115000 
116000 
117000 
118000 
119000 


120000 
121000 


122006 


123000 


124000. 
425000 
126000 
127000 


128000 
129000 


_ 1390000 
131000 
- 132000 
. $33000 


134000 
135000 


136000 
137000 
438000 
“EY 39000 oe 

140000 


141000 
142000 


443000 


144000 


145000 
146000 


147000 


148000 
149000 
150000. 

“151000 


152000 
153000 


154000. 


1.55000 
156000 


157000. 


158000 
159000 
160000 


461000 — 


162000 
163000 
164000 
165000 


MOSTLY IN THE INTRINSIC FUNCTIONS. THE BASIC SNOBOL3 FUNCTIONS 


ACT AS THEY DO ON UTHER SYSTEMS BUT THOSE WHOSE ACTIONS ARE MACHINE 
DEPENDENT ARE OFTEN DIFFERENTe THERE ARE A NUMBER OF NEW FUNCTIONS 


THAT REFLECT THE PECULIARITIES OF THE BSS00 GPERATING SYSTEM, 


MOST SNOBOL3 PROGRAMS WRITTEN ON OTHER MACHINES CAN BE RUN ON 
THE BS500 WITH ONLY MINOR CHANGES IN THE I/O» MOST OF WHICH CAN BE 
MANE BY THE COMPILER ITSELF. 

AN EXTREMELY USEFUL FACILITY OF THE 85500 IS THE AVAILABILITY OF 
TELETYPES aS I/O DEVICES+ NATURALLY* THIS IS AVAILABLE TQ SNOBOL 
IN AN FASILY*USED MANNERs AND A SIMPLEs VERY USEFUL INTERACTIVE 


DEBUGGING ATO HAS BEEN SUPPLIED FOR TELETYPE USERS, 


SECTION 2 


BPAGE 1 


26 CONTROL CARDS 


THERE ARE TwO TYPES OF CONTROL CaRDS RELEVANT FOR SNOBOL JOBSe* 
THOSE THAT GIVE INFORMATION TO THE OPERATING SYSTEM (THE "MASTER 


CONTROL PROGRAM">» “OR "MCP')» WHICH START WITH A QUESTION MARKS AND 
THOSE THAT GIVE INFORMATION TO THE SNOBOL COMPILER» WHICH START WITH 


A MINUS SIGN ("ve"), 


2el, MCP CONTROL CARDS. 

AT THE START oF A DECK oF CARDS FOR BATCH JOBS» OR TYPED To 
INITIATE A TELETYPE JOBs THE USER NEEDS A SET OF MCP CONTROL CARDS 
FOR BATCH JOBS. THESE ARE SEPARATE CARDS» EACH STARTING WITH 4 
QUESTION MARK CYILLEGAL CHARACTER"). FOR TELETYPE JOBS, THE ENTIRE 
SET Of CONTROL CARDS 17S PRECEDED BY A PAIR OF QUESTION MARKS» AND 
THE CARDS ARE SEPARATED BY SEMICOLONS Cuz), WITH AN ARROW AFTER THE 
LAST CONTROL CARD. 

‘THE FIRST Two CARNS IN 4A BATCH JOB SHOULO BE? 


2 USER <PROUe> / <USERH> 
2 EXECUTE SNOBOL/SNOBOL 


THE FIRST CARD IDENTIFIES THE ySER TO THE MCP THE SECOND TELLS IT 


TO. CO INTTIATE ‘SNOBOL«, THE PROGRAM AND DATA DECK MUST. BE PRECEDED BY. 
a DATA. <NAME> 
WHICH NAMES: THE INPUT DECK. BETWEEN THE EXECUTE CARD AND THE DATA. 


CARD. CAN. COME ANY NUMBER OF OTHER CONTROL CAROS$ SOME OF THE CARDS 
THAT ARE USEFUL TO SNOBOL USERS ARE DESCRIBED BELOW. ONE OF THE 


OTHER CONTROL CARDS MUST. BE THE FOLLOWINGS 


2 FILE PROGRAM = <NAME> 


WHERE <NAME> IS THE SAME AS THE <NAME> ON THE DATA CARD. THIS 


ASSIGNS THE CARD DECK AS THE INPUT FILE To THE BONE LEER SgME QTHER 
MCP CONTROL CARDS THAT CAN BE USED ARE: 


? PROCESS = <INTEGER> 
THIS PUTS A CPU TIME LIMIT TO THE ENTIRE RUN OF <INTEGER> 
MINUTES. IF THIS LIMIT IS EXCEEDED, THE JOB WILL BE TERMINATED 
BY THE MCP. THE DEFAULT CPU TIME LIMIT IS 2 MINUTES. 

? 10 = <INTEGER> 
THIS PuTS A TIME LIMIT OF <INTEGER> MINUTES TO THE I[/0 TIME 
THAT CAN BE USED BY THE RUN, THE DEFAULT I/O LIMIT IS 
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£46000 


167000 
168000 
169000 


470000 


171000 


472000 


173000 
174000 
173000 
176000 
177000 


178000 


1FORNN 
Ae FUN 


180000 
181000 


182000 
183000 
‘184000 


185000 
186000 


187000 
188000. 
189000” 
- 490000 

WHERE “<NAME> ols THE. "INTERNAL" NAME OF TRE FILE» AND <NAMEL>/<NAMEQ> 


191000 
192000 
193000 


ye4oo0. 
195000 

196000. 
197000 


198000 
199000 


200000 

201000 

202000 
"203000 


204000 


_ 205000 
206000... 
ee 207000 - 
208000... 2. 
BS O6000 


2190000 
211000 


221000 
222000 


5 MINUTES. 

? STACK = <INTEGER> 
THIS ASSIGNS A STACK OF <INTEGER> WORDS TQ THE RUNe THIS 
IS ONLY NECESSARY IF THE PROGRAM REACHES GREAT DEPTHS OF 
FUNCTION CALLS* CAUSING STACK OVERFLOWS, THE DEFAULT STACK 
SIZE 1S 542. 

2 CORE = <INTEGER> 
THIS ASSIGNS A CORE ESTIMATE OF <INTEGER> WORDS TO THE 
RUNe THE JOR WILL pe STARTED WHEN THIS MANY WORDS BECOME 
AVAILABLE» THE DEFAULT CORE ESTIMATE IS 10000, 


A BATCH JOB CAN EXECUTE A SNOBOL PROGRAM FROM A DISK FILE IF THE 
DATA CARD Is omITTED AND THE PROGRAM CARD IS CHANGED TO: 


? FILE PROGRAM = <NAMEL>/<NAME2> SERIAL 


WHERE <NAME1>7<NAME2> IS THE NAME OF THE DISK FILEs IN GENERAL» 


THe. INPUT. FILE NAMED “PROGRAM” cAN Be ASSIGNED TO ANY FILE WHICH 
CAN BE READ WITH 10530 BLOCKING. 


ANOTHER CONTROL CARD WHICH IS OCCASIONALLY USEFUL» THOUGH THE 
SAME RESULTS CAN BE ACHEIVED WITH THE SNOBOL FUNCTION FILL Cds IS 
THE PALE CARD» WHICH HAS THE GENERAL FORM; 


? FILE <NAMED = <NAME1>/<NAME2> <UNLT? 


IS TRE "EXTERNAL™ NAME Of THE FILE ACTUALLY BEING USED, FOR SNOBOL 


JOBS, <NAME> SHOULD BE THE I/0 STRING NAME, WITH THE EXCEPTION 
OF: THE STRING READ» WHICH THE MCP THINKS IS CALLED "PROGRAM", 
“SUNIT> INDICATES WHAT SORT OF I/O DEVICE IS TO BE USED. SOME . 


POSSIBLE VALUES FOR <UNIT> ARE: 
SERTaAL MEANS SERIAL DISK FILE 
PRINT MEANS LINE PRINTER FILE*=NO BACK=UP 
PRINT OP Back UP MEANS LINE PRINTER OR PRINTER gackeuP 
TAPE MEANS MAGNETIC. TAPE 
FOR. INPUT. FYLESs [7 1S ONLY NECESSARY TO DySTINGU]SH. DISK FILES 


FROM NON=DISK FILES+ OF THE STANDARD SNOBOL FILES» NEWDISK IS 


ASSUMED TO BE A DISK FILE UNLESS DECLARED OTHERWISES ALL OTHERS 
ARE NON™DISK UNLESS THE USER SPECIFICALLY ASKS FoR DISK. 
SUME EXAMPLES OF FILE CARDS ARE: 


“9 FILE CARD. = RALPH/GRK SERIAL i ee FILE) 


> FILE PROGRAM = MLX/PHLP - (NGN=DISK3 ASSIGNS READ) 
2 FILE PRINT = P PRINT OR BACK UP (GOES TO PRINTER IF IT CAN) 


2 FILE PRINT = PRNT PRINT (LPs NO BACK*UP) 
hap US ee Al Ata (GOES TO DISK) 


212000. 
213000. NC 
214000 
215000 
216000, 


" THAT THE FILE CARD ONLY APPLIES TO THE FIRST FILE THAT AN 170 
STRING 1S ASSIGNED TO, TO RE#ASSIGN AN I/O STRING TO. A. SECOND FILE» 
IT 1S NecESSARY TO USE°THE SNOBOL FUNCTIONS CLOSEC) AND FILL(). 

NOTE ESPECIALLY THAT TO ASSIGN THE INPUT FILE READ CwHICH CAN 


10 ONLY BE DONE WITH TELETYPE JOBSs SINCE JT IS ASSIGNED TO THE PROGRAM 
O FILE AUTOMATICALLY FOR BATCH yOBS)» THE CARD USED STARTS WITH 

4 ) "2 FILE PROGRAM) ‘NOT WITH mo FILE READs 

220000 0 ee 


*CP 30 


4 


T4tlt 


e® ® 


Mocre Business Forms, inc. sv 


e 


223000 SOME EXAMPLES OF BATCH JOBS: 
274000 


225000 TO RUN A SIMPLE BATCH JOB USING A CARD DECK» THE FOLLOWING MIGHT 
fei a Lap ciel Mien ee OO ae oe USED 
RRTO00 
228000 2 USER 1234/5678 
cor ee ie, 229000 +? EXECUTE SNOROL/SNOBOL 
230000 ? FILE PROGRAM = AJONES 
231000 ? PROCESS = 3 
ae dy EO rede t ot 7 
. eo ene 
oe eseooe 
ee eee 
236000 ; 
237000 ; 


242000 


= TMILLR/SOCK SERTAL 


255000 2.2. SNOBOL CONTROL CARDS, 


“TIONS OF THE. SNOBOL COMPILER ARE CONTROLED BY SNOBOL 


VALID CONTROL CARD» A DIAGNOSTIC MESSAGE WILL BE 


859000. 0 18 NOT A. - 
360000 PRINTED, “AND THE CARD WILL BE IGNORED. THE CONTROL CARDS THAT ARE 


CURRENTLY RECOGNIZED ARE? 


266000. “MLIST. <INTEGER> 
267000 TRIS INITIATES LISTING OF THE PROGRAM ON THE LINE PRINTER FILEs 
wn €68000  PRINTe THERE WILL BE <INTEGER> BLANK LINES BETWEEN EACH LINE 
269000. oe OE Aye UTAVING. | IF <INTEGER> 18 OMITTED» 0 €ZERO) IS ASSUMED... 
2 POp00, oe 
a “ENGNG 
272000 
273000 &CP 2 
__..274000 “UNLIST. 
275000 ~ THIS CARO STOPS THE LISTING. 


- 276000 
oe 277000 
278000 

279000 %CP 3 


WHICH ARE ANY CARDS WITH A" IN COLUMN 4, IF. SUCH 
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e vw 
Ave 280000 =PCtc. 
} 281000 THIS CAUSES ALL CONTROL CARDS TO BE LISTEDs EVEN IF THE PROGRAM 
282000 ITSELF IS NOT BEING LISTED, 
BS iene oO oe tO OOO ac ia 
284000 
285000 _. oo 
US ee 286000 %cP 2.) 
287000 "EJECT 
288000 THIS EJECTS THE LISTING TO THE TOP OF THE NEXT PaGE 
ae ee 00 xCR. ca ; 
“SPACE <INTEGER> 
THIS PRODUCES <INTEGER> BLANK LINES IN THE LISTING» 
ee 398000. xCP 6. : e 
299000 “=WIDTR “<INTEGER> 
300000 THIS SAYS THAT THE COMPILER IS TO USE THE FIRST <INTEGER?> 
ae 301000. _ CHARACTERS oF EACH CARD READ FROM A CARDWIMAGE FILE IT DOES 
302000 © NOT APPLY TO INPUT FROM A TELETYPE. THE COMPILER ASSUMES © 
3039000 © THAT 72 CHARACTERS ARE TO BE USED IF THIS CARD ISNT USED+ THE | 
eo 304000 MAXIMUM CARD WIDTH IS B80, 
305000 
306000 
ht Beg Ah Palit aN PAC) 9 a ee eee 
308000 %cP 6. ee : 
809000 =26. 
ee Meson fats Says THAT. THE DECK Was PUNCHED ON AN 026 KEYPUNCHs WITH 
311000 ~~ THE IBM/CDC CHARACTER SET. & CHARACTER@SET TRANSLATION WILL 
312000 BE MADE 8Y THE COMPILER BEFORE COMPILING EACH CARD. THE HANDLING 
313000 OF "SPECIAL CHARACTERS" NOT ON THE 026 IS NOT VERY WELL* DEFINED. 
ee GARD CAN ALSO. BE WRITTEN "#026" IF DESIRED. 
815000 2 
a -. 316000... oe 
317000 
318000 %cP 9 
_ 319000 = 3600 
320000 THIS CAUSES THE SAME CONVERSION AS THE =26 CARDs AND ALSO TRANSLATES 
321000 = THE I/O STRING NAMES USED ON THE CDC3600 SNOBOL AS IMPLEMENTED 
ee 3292000 AT. INT IN PARTICULAR» THE FOLLOWING 
323000 SUBSTITUTIONS ARE MADE 
324000 
its a eee Ma As at ok POE OOOO Ten OL BOCUNE Oo NERD.” 
326000 ree BECONEs "LOOK " 
Coe ene 328000 | aes 
329000 
330000 
Te RE eee. Fe 2019) OR ONL aaa . 
ee 332000 “B5500 
333000. THIS “CANCELS. ANY. PREVIOUS ~26 OR (73690 CARD, 
ee PB AQOO Cees 
335000 
336000 


i412T 


arms, inc. Sv 


®9 © @e@0e@6hmUhMMUhéC mhé<(<‘STo8e ~:~ &—~—~tihhC< HUmCUCOhUhOhOhmhCOOmhUC HMC OOmhUCc OHhUCc MhUC Oh 


Moore Business F 


if 
4 
} 


i 
t 
4 
§ 
3 


337000 


336000 
339000 


_ 340000 _. 
341000. 


342000 
343000 
344000 
345000 


346000. 
347000. 
(348000 | 
349000 


350000 
351000 


352000. 
353000 — 

354000 
355000 


356000 
357000 


358000. 
359000 
360000 
361000 


362000 
363000 


364000. 
365000 | 


367000 


368000 
349000 


374000 
375000 
376000 


377000. 
378000 | 
3790000 2 


389000 
381000 
382000 


383000 — 
384000 
“885000 000. 


386000 
387000 


_ 388000 


389000 
390000 
391000 
392000 
393000 


RCP 5. 

“PUNCH 

THIS CAUSES THE COMPILER TO PUNCH OUT THE PROGRAM DECK ON THE 
CARD PUNCH» STARTING WITH THE NEXT CARD. THIS CAN BE USED WITH 

A 726 OR =3600 CARD TO PRODUCE A 85500 DECK FROM A SNOBOL PROGRAM 
WRITTEN FOR ANOTHER MACHINE. 


ZCP. 8. 
TINFORM 

THIS TURNS ON A SET OF SYSTEM INFORMATIVE DIAGNOSTICS, IT IS 
EQUIVALENT TO THE RUN"TIME USE OF MODE ("INFORM") SOME MESSAGES 
“THaT aRE PRODUCED 8Y THE COMPILER IF THIS CARD IS USED ARE: 
LABELS REFERENCED THAT ARE UNDEFINED CAT THE END OF THE LISTING); 
INACCESSIRBLE INSTRUCTIONS3 USING “DEFINE TU RE*DEFINE A PREVIOUSLY 
DEFINED FUNCTIONS USING NON@NUMERIC LITERALS IN ARITHMETICs 
AND OTHER THINGS THAT MAY BE ADDED IN THE FUTURE. 


4CP 2 


WSILENCE 
Tre CANCELS ANY PREVIOUS "INFORM. CARD, 


CP 4 

oWATT. <INTEGER> 

THES SETS THE: WAITING TIME FOR TELETYPE 170 TO <INTEGER?>. 
 SECONDSs IT TS EQUIVALENT TO USING WAITC™<INTEGER>") AT 
RUN TIME, 


cose e te OOOO 
371000 
372000 


cr 42. 
373000 


=LIMTT “<QUANTITY> “<INTEGER> 

THIS SETS A PROGRAM LIMIT TO THE THING NAMED BY <QUANTITY> 
TO THE VALUgG OF <INTEGER>. IF THIS LIMIT IS EXCEEDEDe THE 
PROGRAM wILL BE TERMINATED ABNORMALLY« SOME POSSIBLE VALUES 


FOR <QUANTITY> ARE: 
RULES SETS A LIMIT TO THE NUMBER OF RULES THAT CAN BE 


EXECUTED. 
PROCESS SETS A TIME LIMIT CIN SECONDS) TO THE PROGRAMS 
cPU TIME, 
1G: “SETS A TIME LIMIT CIN SECONDS) TO THE PROGRAMS 
Eee yO: TIME, ; 


SCP 9 

"SIZE <INTEGER?> 
THIS TELLS THE COMPILER HOW MANY INSTRUCTIONS TO EXPECT IN THE 
PROGRAM. IT NEED NOT BE USED4 IT ALLOWS THE COMPILER TO SET 
UP ITS TABLES TO TRY TO MINIMIZE THE TIME FOR BOTH COMPILATION 
AND FXECLITION, THE VALUE OF <IJNTEGER> SHOULD BE ABOUT CSAY»s 
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394000 
395000 
396000 
397000 


398000 ~~ 
399000 
“400000 


401000 
402000 


404000 
— 405000 
“406000 


497000 
408000 


413000 
4144000 


atid 000 
416000 _ 


417000 


418000. — 


419000 


420000 
421000 


422000 
Ae3000, . 
4240007. ee 
425000 


426000 


427000, 

428000 © 
429000 
420000. 
“431000 


432000 


433000 


436000. 
“437000. 


438000 
439000 


 MAO000 
441000 © 

#42000 
443000 


444000 
445000 


— @Ne000 | 
BET O00 

— 8A8000 
449000 | 


450000 


WITHIN 25 OF) ThE NUMBER OF INSTRUCTIONS IN THE PROGRAMe THIS CARD 


CAN CAUSE SAVINGS OF 510% IN LARGE PROGRAMS, IF USED» A SIZE 
CARD MUST APPEAR BEFORE ALL PROGRAM MATERIAL CINCLUDING “SET> 
“DEFINE, =COMPILEs AND =LOAD CARDS). 


%CP 24 
"SET <IDENTIFIER> <LITERALS> 
TRIS CARD ASSIGNS AN INITIAL VALUE To THE VARIABLE NAMED 


<IDENTIFIER>.« THE VALUE IS DETERMINED BY SCANNING THE CARD 
FOR aLL LITERALS» AND CONCATENATING THEM, ANYTHING BETWEEN 


THE LITERALS Is TREATED AS COMMENT. THUS» A LONG STRING CAN 
Pe BROKEN UP BETWEEN SEVERAL CARDS IN ANY CONVENIENT WAY. SOME 


EXAMPLES OF *SET CARDS ARE? 


499000... 
#10000): 

AP APT O00 coe. 
AV e000 ee: 


SET ALPHABET "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 

=SET CARDNAME "GEORGE /POSDECK" 

“SET SUITS "HEARTS» CLUBS» SPADES*D1AMQNDS" 

“SET CITIES "NEW YORKsN«Ys/CHICAGOs ILL + /BOSTON*MASSa/" 

: "SAN FRANCISCUsCALIF «/DENVERs COLe/CLEVELANDsOHIO/" 
oth cl "NEW URLEANSsLA,/LUS ANGELES» CALIF « /ATLANTAsGAg/™ 

oy MPHOENTX® ARTZ, {PITISBURG*PENN, /SEATTLE® WASH A /™ 
“SET OPS ee eee 


THE WAJOR REASON FOR USING A =SET CARD IS THAT IT SAVES THE 


SPACE THAT WOULD BE REQUIRED FOR THE EQUIVALENT RUN“TIME ASSIGNMENT 


_ STATEMENTs THIS CAN BE IMPORTANT WHEN THE SMALL MEMORY SIZE 
= OF THE 85500 I$ TAKEN INTO ACCOUNT. 


CP 34 
DEFINE <LITi> » <LIT2> » <LIT3> 


THIS SETS UP A FUNCTION DURING COMPILATION. IN THE SAME WAY THAT 


OA CALL OOF DEFINE (<LITI>*<LIT2>s<LIT3>) WOULD DURING EXECUTION. 
THE PARAMETERS MUST aLL BE SINGLE LITERALS (NO CONCATENATION 
WILL BE DONE BY THE COMPILER)*® LIKE THE “SET CARDs A =DEFINE 


CARD SAVES THE SPACE AND EXTRA TIME THAT WOULD BE REQUIRED FOR 


AN INSTRUCTION 10 CREATE THE FUNCTION AT RUN TIME. IT USUALLY 
TURNS OUT EASTER TO USE THE “DEFINE CARDs THOUGHs SINCE THIS 
MAKES IT POSSIBLE TO PLACE THE DEFINITION TOGETHER WITH THE 
FUNCTION CODE WITHOUT THE NEED TG LINK THE DEFINITIONS TOGETHER 
“WITH GO"TOS,. THE PARAMETERS HAVE THE FOLLOWING MEANINGS? 


Zo 1S (THE "FUNCTION PROTOTYPE» OF THE FORMS 
“<FeTeC “<PARAMS> ) 


MERE: CTD 1s THE FUNCTION NAME» AND «PARAMS? IS A 

LIST OF FORMAL PARAMETERS» SEPARATED BY COMMAS, 

<LIT2> CONTAINS A LABEL» WHICH IS THE ENTRY POINT OF 
THE FUNCTION. IF <LIT2> IS MISSING C(I.» THE COMMAS ~ 
HAVE NO LITERAL BETWEEN THEM)» THEN. THE ENTRY POINT Is 

TAKEN TO BE. SPELLED THE SAME AS <FCT>, 

<LIT3> CONTAINS A LIST OF LOCAL VARIABLES*=A LIST OF 
IDENTIFIERS» SEPARATED BY COMMAS, 
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“451000 a es | | 
452000 FOR FURTHER INFORMATION» SEE SECTIONS 3,2 (FUNCTION CALLS) AND 9 
ieee CINTRINSIC FUNCTIONS™*DEFINEC)). SOME FXAMPLES OF "DEFINE CARDS? 


54000 
Goon DEFINE. *MCAL2A2)%2 "M4 e"VeXYs ALPH" 
: "456000. “DEFINE. "MAXCAsSB)" 
a 457000... PER INE "MINCMIN» xX)" 

458000 "DEFINE "FCTC)™ eo "XxX" 
459000 “DEFINE "MRGECLOs"MRGENTRYs "Lh tel QoL, 3*t 

Seah ore ons 2 460000  _—s NEF INEC™GLORCHCA*BsCsDeEoF oGotHol "ae "GLORK*e"UsKaleMeNeOeP™) 
captoan ee : 
462000: Le 

ere 463000 - ae 
4454000 Scr a 
465000 "NEBUG 


=A 80000... THIS TURNS ON "DEBUG MODE" (SEE SECTION 11,2) DURING COMPILATION» AND 
‘JOB TQ BE SUSPENDED JUST BEFORE THE FIRST INSTRUCTION Ls. 


Ur THERE. le A TELETYPE ATTACHED)+ 


I 
470000 
471000 


4 Oe |> 
476000 CARD ‘TS FOUND«. THE COMPILER WILL READ EVERYTHING IN THE FILE 
477000 UP TO AN END CARD OR THE ENDWOF@FILEs AND THEN RETURN TO THE 
£ COR TELETYPE). IF AN END CARD IS FQUND, IT IS 
A LABELS TF ONE IS FOUND» IT BECOMES THE PROGRAM. 
IT CUNLESS A LATER END CARD CHANGES IT), IF. THE FILE. 
1000 _ NOT ON THE OISK, A OIAGNOSTIC WILL BE PRINTED AND THE 
482000 CARO WILL BE IGNORED. ANY CARD@*IMAGE FILE CWITH 80*CHAR LOGICAL 
483000 RECORDS) CAN BE READ BY THE COMPILER, 
484000 —_—sC THE ~MOST OBVIOUS USE OF THE =COMPILE CARD IS TO ENABLE USERS TO 
5 NOBOL "LIBRARY" OF FUNCTIONS» WHICH CAN THEN BE USED 
“SIMPLY INCLUDING A #=COMPILE CARD FOR EACH FUNCTION 
DESIRE LTHOUGH STANDARDS FOR SUCH A LIBRARY ARE CLEARLY. NOT 
ENFORCEABLE» 30ME GUIDELINES ARE SUGGESTED HERE wHICH sHOULD MAKE 
489000 IT EASIER TO USE LIBRARY FILES! 


H DOCUMENTATTON SHOULD EYTHER BE yNCLUDED Nn THE CODE OR. 
OULD BE COMMENTS AT THE START. OF THE FILE TELLING THE 
= 493000... USEI WHERE TO FIND DOCUMENTATION. — 
494000 2) FUNCTIONS SHOULD BE SET UP BY THE "DEFINE CONTROL CARD: RATHER 

THAN BY THE FUNCTION DEFINEC)» SO THAT THE USER DOESNT HAVE TO 
SET uP a LOT OF GO*TOS INTO THE CODE, 
3) THE USER sHOULD GET INTO THE CODE By CALLING A FUNCTION,» RATHER | 
49 100 THAN BY A GO"TO, THIS MAKES {T MUCH EASTER TO INTEGRATE THe CODE 
499000... ss WITH THE MAIN PROGRAM, 


500000 4) NO INSTRUCTIONS IN THE LIBRARY FILE SHOULD TRANSFER OUT 
501000 OF THE FILE» WITHOUT EXPLICIT DESCRIPTIONS OF ALL LABELS 
eee 502000 THAT THE CALLING PROGRAM SHOULD CONTAIN. THIS SHOULD 
593000 BE AVOIDEN ENTIRELY IF POSSIBLE. 
504000 5) THERE SHOULD BE VERY EXPLICIT COMMENTS DESCRIBING ALL GLOBAL 
os 595000 VARIABLES USEO OR ALTERED BY THE CODE. WHENEVER POSSIGLEs 
506000 THE CDE SHOULD 00 ITS OWN INITIALIZATION BY MEANS OF 
597000 THE =SET CONTROL CARD, RATHER THAN ASKING THE USER TO 
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509000 
510000 


5120.00 
-- §13000 
~~ 514000 
515000 
516000 
517000. 
518000 
519000 
520000 


521000 © 


322000 


528000 
529000 


598000 


211000 


eh 
_§26000. 
527000 


"erg 30000 


EF TGURE OUT WHAT TO DQ, 
6) LABELS SHOULD BE SUCH THAT USERS OF THE FILE ARE UNLIKELY 
TO DUPLICATE THEM IN THEIR OWN CONE, THIS 318 MOST EASILY 
HANDLED BY MAKING EACH LABEL INCLUDE EITHER THE NAME OF 
THE FILE. oR TRE. NAME OF TRE FUNCTION THEY ARE USED. [Ne NOTE 
THAT Te Tw LIBRARY FILES USE THE SAME LABEL» THEY CANT 
BE “USED IN THE SAME PROGRAM, 


CP 12” 
“LIBRARY. “<NAMEL>/<NAME2> 
“THIS CARD CREATES A "LIBRARY" FILE CONTAINING THE COMPILED 
VERSION qe THe PROGRAM, THE FYl. c TS NAMED <NAMEL>/<NAME2>, 
THIS LIBRARY FILE CAN THEN BE USED IN A LATER RUN WITHOUT 
_ RECOMPILING [T BY USING THE “LOAN CARD (SEE BELOW), A “LIBRARY 
CARD TS. NORMALLY. THE: LAST CARD IN THE PROGRAM DECKs COMING | 
| UST BEFORE THE END CARD» BUT IT CAN APPEAR ANYWHERE IN A 
PROGRAM» AND. THE PROGRAM STORED IN THE FILE WILL Look AS IF 
THE #LIBRARY CARD HAD BEEN FOLLOWED BY AN END CARDe SEVERAL 
*LIBRARY CAROS CAN BE USED IN THE SAME PROGRAM» IF DESIRED, 
IN ADDITION TO THE PROGRAM ITSELFs ANY LIMITS SET BY =LIMIT 
Eats ARE ‘SAVED? AS” TS. THE. ENTRY POINT. AS OF THE "LIBRARY CARD. 


531000 . 


533000 
534000 
535000 


540000 
541000 


~~ §45000 
546000 


OOD es 


352000 
353000 
554000. 
 -§55000 
556000. 
557000 
558000 

oo ae 59009. 
-6§60000. 
561000 
962000 
§63000 
564000 


7 336000 
- 83r000 
538000 | 
339900 


544000- 


832000. 


ZCP 43 

"LOAD <NAMEL>/<NAME2> 

THIS LOADS A LIBRARY FILE CREATED BY A =LIBRARY CARD IN A 

PREVIOUS | RUN, IF THE FILE NAMED IS NOT PRESENT OR IS NOT 

oohe vAL UO. LIBRARY. FILE» A DIAGNOSTIC MESSAGE wILkL BE PRINTEDs 

Te THE FILE WAS THERE» BUT CONTAINED DAMAGED CODE» THE COMPILER 
WILL OFTEN BE UNABLE TO RECOVER FROM THE BAD INFORMATION LOADED 

INTO ITS TABLES WHEN THE PROBLEM [S$ DISCOVERED; THIS WILL 

CAUSE THE. COMPILER. TO SIMPLY GIVE UP AND THE JOB WILL TERMINATE: 
ONLY ONE *LOQAD CARO CAN BE USED IN A-PROGRAMs AND IT MUST BE 
BEFORE ANY. OTHER. PROGRAM MATERIAL CINCLUDING INSTRUCTIONS» *SET» 
“eDEFINE CONTROL CARDS). THE “LOAD CARD CAN BE FOLLQWED BY MORE 
PROGRAMs WHICH WILL BE COMPILED aND aDDED ONTO THE PROGRAM 
LOADED FROM THE FILE. (CTHE FILE, OF COURSE, wILL NOT BE ALTERED.) 


) SECTION 3 


SPAGE 1 
3+, PROGR aM ORGANIZATION. 


A SNOBOL PROGRAM CONSISTS. Of A Set OF INSTRUCTIONS. THE PROGRAM 
CAN BE INPUT FROM A CARD*IMAGE FILE, OR FROM A TELETYPE, EACH CARD 
IMAGE FROM AN INPUT FILE STARTS A NEW INSTRUCTIONs UNLESS THE FIRST 
CHARACTER IS w,0e IN WHICH CASE THE CARD IS A CONTINUATION OF THE 


PREVIOUS INSTRUCTION» IN 85500 SNOBOL» IT IS ALSO POSSIBLE TO FIT. 


SEVERAL INSTRUCTIONS ON GNE CARD* THQUGH THIS IS RARELY DQNE, 
ROR: JOBS” RUN FROM A TELETYPE» THE PROGRAM IS READ FROM THE TELETYPEs 


WITH ‘Each INPUT BEING. aN INSTRUCTION. -CONTINUATIONS aRE NOT ValIo 


FROM A TELETYPE. THIS IS NOT REALLY A RESTRICTION» SINCE FEW PEOPLE 
ACTUALLY ATTEMPT TO INPUT ENTIRE PROGRAMS FROM A TELETYPE. IT IS FAR 
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545000 
566000 
567000 
368000 . 


 §69000 
§70000 


571000. 
572000 
373000 


374000. 


575000. 
576000 
577000 — 
578000 
579000 


980000. 


531000 


582000. 
583000 


5384000 
385000 
586000 


589000 


590000 
591000 
592000 


595000. 
596000 
597000 
398000 


899000 
600000 


602000 
603000 


604000 
605000 
606000. 

607000.» 


608000 
609000 
640000 


611900 ~ 
612000 
613000. 


614000 
615000 


646000 


617000 
618000 
619000 
620000 
621000 


EASTER TO CREATE A DISK FILE CONTAINING THE PROGRAM (SAYs WITH AN 
EDITING PROGRAM)» AND USE THE *COMPILE CARD TO DIRECT THE COMPILER 


TO THE FILE. 
SCATTERED AMONG THE INSTRUCTIONS IN A PROGRAM CAN BE ANY NUMBER OF 


SNOBOL CONTROL CAROS+ WHICH ARE INSTRUCTIONS TO THE COMPILER» BUT 
ARE NOT ACTUALLY PART OF THE PROGRAMse IN ADDITION TO THE USUAL 
CONTROL CARDS» THE 85500 HAS CARDS THAT CAN BE USED TO DEFINE 
FUNCTIANS DURING COMPILATION, AND TO ASSIGN INITIAL VALUES TO PROGRAM 
VARIABLES. . 
A PROGRAM DECK CAN ALSO CONTAIN ANY NUMBER OF COMMENT CARDS» 

WHICH ARE CAROS STARTING WITH "*" GOR "%", SUCH CARDS ARE PRINTED ON A 
LISTINGs BUT OTHERWISE IGNORED. USERS ARE ENCOURAGED TO MAKE LIBERAL 
USE OF COMMENTS IN THEIR PROGRAMS». 

AT THE END OF A SNOBGL PROGRAM SHUULD BE AN "END" CARD» WHICH 
Is A CARD WITH "END " IN COLUMNS 174, THE FIRST STRING OF NON*BLANK 
CHARACTERS ON THE CARD IS TAKEN AS A LABEL WHICH IS THE “ENTRY POINT" 
To THE PROGRAM. THAT IS, IT IS THE LABEL OF THE FIRST INSTRUCTION 
TO BE EXECUTED. IF THE ENTIRE CARD IS BLANKs THE FIRST INSTRUCTION 
IN THE PROGRAM IS ASSUMED To BE THE ENTRY POINTe 

INSTRUCTIONS CAN BE EITHER LASELEO OR UNLABELEDe LABELS ARE 
NEEDED WHENEVER AN INSTRUCTION MUST BE TRANSFERED TO BY ANOTHER ONE» 
AND OTHER INSTRUCTIUNS ARE GENERALLY UNLABELED, A LABEL IS ANY 


587000 STRING OF NON*BLAaNK CHARACTERS STARTING IN COLUMN 1, IF COLUMN 1 
588000 


TS A BLANK, THE INSTRUCTION IS UNLABELED. LABELS ARENT REALLY A 
PART OF THEIR TNSTRUCTIONS» BUT SIMPLY SERVE AS "NAMES" FOR THE 
INSTRUCTIONS s 

A SNOBOL PROGRAM IS A SINGLE SET OF INSTRUCTIONS» WITH NO SUB*PARTS 


— 592000 CUNLIKE MOST OTHER PROGRAMMING LANGUAGES THAT HAVE SEPARATE BLOCKS 
— S93000. 
~~ §94000- 


OF CODE FOR EACH suB8=ROUTINE OR FUNCTION OR WHATEVER THEY ARE CALLED). 
‘ONE CONSEQUENCE OF THIS IS THaT STATEMENT LABELS IN a SNOBOL PROGRAM 
MUST BE UNIQUE, THERE IS VERY LITTLE CONSISTENCY BETWEEN IMPLEMEN® 


TATIONS ON HOW pOUBLY*pEFINED LABELS ARE TREATED. THE METHOD USED 
ON THE 85500 IS THIS? THE SECOND LABEL OVERWRITES THE FIRST AND 


CAUSES ;7 TO BE RE“DEFINED» BUT A WARNING MESSAGE 1S PRINTED, THyS 


CAN BE USEFUL AT TIMES ON INTERACTIVE JOBS TO RE*DEFINE AN INSTRUCTION 


60 PREVIGUSLY COMPILED. 
GO1000 0 ue 


SPAGE 
Bel, INSTRUCTIONS « 
<INSTRUCTION> 285 <LABELED INST> — 
Se Eve CUNLABELED ENS T> 
‘eLABELED INST> 242 <LABEL> <UNLABELED INST> 
SUNLABELED INST> #22 <BLANKS> <INST> 
<INST> tte <RULE> 
rez <GOTO. PART> 
$s <RULE> <GO"TO PART> 
THE VARTOUS FORMS OF INSTRUCTIONS CAN BE TREATED AS SPECIAL 
CASES OF THE GENERAL FORM? 


<LABEL> <RULE> <GO"TO PART? 


WHERE TT 1S REMEMBERED THAT THERE IS ALWAYS AT LEAST ONE BLANK 
AFTER <LABEL>» IF THIS IS PRESENT» OR ELSE THE INSTRUCTION 
STARTS WITH AT LEAST ONE BLANK, 
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622900 
623000 
624000 


. §25000 
626000 


627000 


628000 


629000 
630000 


631000 
632000 


633000 


- 634000 


635000 
636000 
637000 


638000 
640000 — 


641000 
642000 


_ 643000 £ 
644000 
645000 
646000. 


647000 
648000 
649000 


650000. 
651000 . 
WHEN A PROGRAM= “DEFINED FUNCTION I§ CALLED» THE FOLLOWING OCCURS: 


652000 


~ 653000 


654000 
655000 


656000 


657000 


658000 
659000 


660000 
661000 


666000 


(667000 
668000 | 
669000 
670000. 
671000 


672000 


673000 | 
: 00 2) THIS STRING» THE FORMAL PARAMETERS» AND THE LOCAL VARIABLES ARE ~ 


THE <LABEL>, OF COURSE, IS JUST A NAME FOR THE INSTRUCTION, 

A <LABEL> IS ONLY NEEDED IF SOME OTHER PART OF THE PROGRAM IS TO 
TO TRANSFER TO THE INSTRUCTION* THOUGH THERE IS NO OBJECTION TO 
USING LABELS WHICH ARE NEVER REFERENCED. LABELS ARE DESCRIBED 
IN: SECTION. Te ae 

THE <RULE> IS THE PART OF AN INSTRUCTION THAT OPERATES ON DATA$ 
IT IS THE PaRT THAT "DOES THINGS". SEE SECTION 4 FOR DESCRIPTIONS 
OF THE yARIOUS TYPES OF RULES AVAILABLE. 

THE <GO"TO PART> TELLS WHAT INSTRUCTY]ONS ARE TO FOLLOW NEXT, 


SNOBOL3 ALLOWS CONDITIONAL BRANCHING ON THE SUCCESS OR FAILURE 


OF THE RULE. . AN INSTRUCTION CAN ALSO CALCULATE THE LABEL 

OF THE NEXT INSTRUCTION« OMISSION OF THE GO™TO PART CAUSES THE 
INSTRUCTION TO "FALL THROUGH" 70 THE NEXT INSTRUCTION IN THE PROGRAM, 
Str SECT ION 2 ror DETAILE DESCRIPTIONS Or GOe*TO PARTS, 


SCP 8 


3,2. PROGRAM=DEFINED FUNCTIONS, 


“IN ADDITION TO THE FUNCTIONS PRE*DEFINED BY THE SNOBOL INTER= 
PRETERs A PROGRAMMER CAN DEFINE HIS QWN FUNCTIONS CODED IN SNOBOL | 
BY USING EITHER THE FUNCTION DEFINE() (SEE SEC. 9) OR THE “DEFINE 
CONTROL CARD (SEE SEC+2e2). IN SECTION 5,3% THE USE OF FUNCTIONS 
CALLS Is DESCRIAREDs THIS SECTION DESCRIBES THE DEFINITION OF THE 
FUNCTIONS, ~ . 


éop 15. 


a, 2ate FUNCTION CALLS» 


1) THE sTRING WITH THE SAME NAME AS THE FUNCTION Is PUSHED DOWN» 
AND SET NULL. 


2) THE FORMAL PARAMETERS ARE PUSHED DOWN, AND THEN ASSIGNED THE 


VALUES OF THE CORRESPONDING ACTUAL PARAMETERS. IF THERE ARENT 
-ENQUGH ACTUAL PARAMETERS» THE EXTRA FORMAL PARAMETERS ARE SET 
NULL. 

3) THE LOCAL VARIABLES ARE PUSRED ANDO SET NULL, 


= 4) THE PROGRAM TRANSFERS TO THE FUNCTIONS ENTRY POINTe 
6620005 8, eee ore 
663000 
- 664000 
665000. 


ee ad 


3e2e20e FUNCTION RETURNS. 


“WHEN A PROGRAM TRANSFERS TO THE "RESERVED LABELS" RETURN. AND 


-FRETURN» THE LAST FUNCTION CALLED IS TERMINATEDs AND THE FOLLOWING 
ACTIONS OCCUR: 


1) THE yALUE OF THE STRING NAMED THE SAME AS THE FUNCTION IS GIVEN 
TO THE CALLING INSTRUCTION AS THE VALUE OF THE FUNCTIONe 


ALL POPPED UP» RETURNING THEM TO THEIR VALUES BEFORE THE CALL s 

) IF THE RETURN WAS MADE BY: TRANSFERING TO "FRETURN"s THE CALLING 
“ENSTRUCTION FAILS$ IF THE RETURN WAS BY "RETURN's THE CALLING 
INSTRUCTION CONTINUFS aS USUAL, 
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ee eg OOO: 
680000 
681000 4cP 10 
BB 2000 3. 1A 3. FUNCTION CODE. 
683000. JIN” CONTRAST WITH MOST. OTHER PROGRAMMING LANGUAGE Ss A SNOBOL 
684000 FUNCTION HAS: NO "ROOY* OF CODE THAT BELONGS TO THE FUNCTION ALONE, 
685000 THAT IS. FROM ITS ENTRY POINTs A FUNCTION CAN TRANSFER TO. ANY 
686000 INSTRUCTION IN THE PROGRAM. RETURN OCCURS ONLY WHEN A TRANSFER TO 
687000 RETURN OR FRETURN IS MADE. THIS MEANS THAT SEVERAL SNOBOL 
 §88000. FUNCTIONS | CAN. SHARE ALL OR PART OF THEIR CODE. ALSO» NOTE THAT IF 
689000 A STRING 1S NOT ONE OF THE STRINGS PUSHED AT THE CALL OF A FUNCTION? 
- bpoone Then CTT, FUNCTION CAN USE OR ALTER THE STRING FREELY. 
ete ee 691000 - - 
692060 
693000 aCP 12 


ALLING. . DEFINE)» | 


Y COMMON PROBLEM WITH NOVICE SNOBOL PROGRAMMERS Is. THE 
65 ATLURE TO REALIZE THAT THE FUNCTION DEFINEC) ACTUALLY CREATES A 
698000 FUNCTION WHEN IT IS CALLED, It IS NOT ENOUGH TO INCLUDE A CALL OF 
eran ue DEFINEC) IN A PROGRAM==THE PROGRAM MUST EXECUTE THE STATEMENT CON# 
Me pec car ts OR THE. FUNCTION Webb NOT BE DEFINED». 


EC, 242) SINCE MOST SNOBOL SYSTEMS. DONT HAVE. THIS 


708000 


IN ORDER TO START EXECUTION OF A SNOBOL PROGRAM, IT IS NECESSARY 
712000 TO INDICATE WHERE THE EXECUTION IS TO BEGINe THE FIRST INSTRUCTION 
“713 se Ds THE "ENTRY POINT's IS INDICATED BY THE END CARD AT. 
PROGRAM. THE FIRST FOUR CHARACTERS OF THIS CARD ARE 

7 oO WE THE COMPILER SCANS THE REST OF THE CARD FOR A NON@BLANK. 
716000 CHARACTER, IF ONE IS FOUND, THE STRING UP TO THE NEXT BLANK OR TO 
717000 THE END OF THE CARD IS THE LABEL OF THE ENTRY POINTe FOR EXAMPLES 
0 


fe ) SAYS T EXECUTION | Is 10. START AT THE LABEL BEGIN. IF THERE 1s. 
732000 NO LABEL ON THE END CARD, THE FIRST INSTRUCTION IN THE PROGRAM IS_ 
723000 TAKEN TO BE THE ENTRY POINT, 
_..724000 IF THE PROGRAM CUNTAINS “COMPILE CARDS» AND THE FILES THEMSELVES 


Ay SUCH LABEL IS THE PROGRAM ENTRY POINT 

‘000... IF iE ENTRY. POINT Isa LABEL. THAT NOESNT GCCUR IN THE PROGRAM, 
“738000 A “BT AGNOSTIC MESSAGE TO THAT EFFECT IS PRINTED» AND NO EXECUTION 
729000 TAKES PLACE. THIS CAN BE USED TO GET COMPILES FOR SYNTAX CHECKING 
ree pear, 50000 OR A COMPILE TO LIBRARY WITHOUT IMMEDIATE EXECUTION, 
ee 731000 
732000 
733000 
734000 ¥SECTION 4 
735000 *%PAGE 1 


oy USING IT WILL MAKE THE PROGRAM INCOMPATIBLE WITH THESE 


CARDS» THE LABELS CIF ANY) ON THESE END CARDS ARE NOTED» 
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736000 


737000 
738000 


740000 


752000. 
oo  eg000 
e  FS§ 8000. 


741000 
‘TAZ000. 


743000 
744000 


745000 
746000 

747000. 
748000 


749000 


750000 


751000 


755000 
756000 


737000 
7538000 
739000. 
760000 


761000 
762000 


763000 
764000. 
765000 
160000 
767000 


768000 
769000 


— 070000 
771000 
772000. 
773000 — 


774000 


775000 | 


co 
779000 


780000 
781000 


Lo 
783000 
784000 © 


783000 
786000 


787000 
788000 


789000 


791000 
792000 


4, RULES. - 


<RULE> $t= <STR REF> 
739000... 8 STR REF> <PATTERN> 
$38 <STR REF> <REPLACEMENT> 
gps <STR REF> <PATTERN> <REPLACEMENT> 
<STR REF> $22 <ELEMENT> Hg 
<PATTERN> st: <ELEMENT 
tse <STR VAR> 
tic <PATTERN> <PATTERN> 
oe “tgs <PATTERN> <BACK REF> 
--gREPLACEMENT> tts <RPL DELIMITER> <EXPRESSION> 
<RPL DELIMITER? tte ¢ é 
THERE ARE SEVERAL VARIETIES OF RULES» AS SHOWN ABOVE, BUT ALL 
CAN. ‘BE viene AS. SPECT AL CASES OF -THE GENERAL FORM a 


<sTR REFD <PATTERN> “<REPLACEMENT> 


IF THE PATTERN IS OMITTED» AN ARBITRARY STRING VARIABLE 
WILL BE ASSUMEDS THIS STRING VARIABLE WILL MATCH THE ENTIRE STRING 


REFERENCES” RESULTING IN AN "ASSIGNMENT STATEMENT"s IF THE REPLACEMENT. 


IS OMITTEDs NO REPLACEMENT TAKES PLACEs IF BOTH PATTERN AND REPLACES — 
MENT ARE OMITTED» THE STATEMENT MERELY EVALUATES THE STRING REFERENCE, 
IN TRE LATTER CASE» THE STRING REFERENCE CAN ALSO BE OMITTED» AND 

THE STATEMENT IS A "NO*OP", 

THE FOLLOWING: SUBTSECTIONS DESCRIBE MORE THOROUGHLY THE VARIOUS 
PARTS OF A RULES 


ZCP 20 
4el, THE STRING REFERENCE. 


“STR REFD» THE "STRING REFERENCE» IS THE STRING THAT THE RULE 


Is TO OPERATE ON? IT IS THE "SUBJECT" OF THE STATEMENT.» THE COMPILER 


ASSUMES THAT THE SHORTEST COMPLETE EXPRESSION AT THE START OF A RULE 
IS THE STRING REFERENCES IF A STRING REFERENCE CONSISTING OF SEVERAL 
Ne ee Is DESIRED» IT MUST BE SURROUNDED BY PARENTHESES,» 


ES 

CALPHA BETA + GAMMA) 
SYZECA) 

—$CMAm ND 

pgeaasere?” 


ae 


hoe e. 


EACH TYPE OF RULE INTERPRETS ITS STRING REFERENCE SLIGHTLY DIFFERENTLY: 
AND SOMe RULES WILL NOT AccePT ALL OF THE ABOVE AS STRING REFERENCE® 


“THE FOLLOWING. DESERTES TONS OF INDIVIDUAL RULE. TYPES DESCRIBES: EACH © 


USAGE IN DETAIL, 


T90000 oe, 


@®eeeeeeeseeeeee#ee#seee ® @ @ @ 


y4lZe 


ee © @® @ ®@ 


Moore Business Farms, inc. sv 


@®evevvev0see8eeeeeese°e 


ry 


f 


sot 
| 


| 


i 
a, 

i 

i 


793000 


794000 
795009 


796000 
797000. 


798000 


799000 


800000 
801000 


802000 
893000. 
804000. 

805000 

894000 


807000 


898000 
809000 
810000. 

“8411000. 


812000 
8413000 


wragpsomet a 000 
~ -B15000 


818000 
819000 


_ 820000 | 
821000 — 
—  Be2000 
823000. 


824000 
825000 


826000 
— 827000 
828000 
829000 


830000 
831000 


_, 832000 
833000. 
834000 
835000 


836000 
837000 


. en OO et 
839000 
~~ B40000 
— 841000_ 
842000 


843000 
844000 
845000 
846900 
847000 
848000 
849000 


aCP. 20° res 
4,2. RULES WITH STRING REFERENCE ONLY. 


<RULE> | 38s  <STR REF> . 

THIS TYPE OF RULE SIMPLY EVALUATES THE STRING REFERENCE+ THE 
USUAL USE OF SUCH A RULE IS To CALL A FUNCTION. THIS CAN BE DONE 
EITHER FOR THE SIDE"EFFECTS OF THE FUNCTION» UR TO BRANCH ON THE 
SUCCESS OR FAILURE OF THE FUNCTION. AN EXAMPLE OF THE LATTER IS? 


| BT CSTZECAD #5") SRM) 


THIS STATEMENT WILL TRANSFER TO RM IF THE STRING A CONTAINS MORE 


THAN FIVE CHARACTERS. 
ANOTHER» RARELY USED» FORM OF THIS TYPE OF RULE IS WITH AN INPUT 


STRING AS THE STRING REFERENCE. THIS TYPE OF RULE WILL INPUT A 
RECORD. 

THE PROGRAM HAS USED THE STRING LOOK TO READ THE NEXT CARD FROM THE 
FILE READ» THE CARD CAN BE CLEARED FROM THE BUFFER BY3 


OIE. POSSIBLE)» AND THE INPUT WILL BE LOST. FOR EXAMPLE> IF 


READ 


AND. THE NEXT INPUT WILL GET THE NEXT RECORD» 
BLTE000 ee 
817000 > 


2CP 37 


Ay 3s, RULES WITH PATTERNS, 


| RULER we <sTR REF> <PATTERN> 


THIS “CAUSES A MPATTERN MATCH" TO TAKE PLACE. A PATTERN IS A 
DESCRIPTION OF A STRINGs AND A PATTERN MATCH IS AN ATTEMPT TO FIND 


A SUBSTRING OF THE STRING REFERENCE WHICH IS DESCRIBED BY 
THE PATTERN. THE VARIOUS MEANS OF BUILDING PATTERNS ARE DESCRIBED 


IN SECTION 6« THE GENERAL WAY IN WHICH THIS TYPES OF RULE IS 
EXECUTED IS AS FOLLOWS? 


1) EVALUATE THE STRING REFERENCEs IF 11 Is AN INPUT STRING» READ 
A RECORD. 

2) EVALUATE THE PATTERN» FROM LEFT TO RIGHT. 

ay ATTEMPT. 10 MATCH THE. PATTERN ON SOME SUBSTRING OF THE STR REF. 


OF COURSE» TF ANY PART OF THE RULE FAILS» THE RULE 1s TERMINATED? 


AND THE FAILURE PART OF THE GOTO PART IS EVALUATED. 
FOR EXAMPLE» ASSUME ral xX = "ABCDE" AND E = "BC", THE RULE 


eo*pe /8¢M) 


WILL sUccken» AND THE PROGRaM WILL TRANSFER TO M, THE STRING REF = 


ERENCE» "ABCDE"™, CONTAINS THE PATTERN» E "Ds OR "BCD". ON THE 
OTHER HAND» THE RULE 


HE WE /S(M) 
WILL FAIL» AND TRANSFER TO mM WILL NOT BE MADE» BECAUSE THE STRING 
REFERENCE DOES NOT CONTAIN THE PATTERN E "Cs OR "BCC". 

FOR ANOTHER EXAMPLE» THE RULE 
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“gorse 
898000 | 
899000 
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902000. 


i 
i 
[ 
§ 


| 
i 


850000 
851000 
852000 
853000 


854000 
855000 
856000 . 


857000 
858000 


859000 


860000 


861000 


862000 


863000 
864000 


865.000 | 
866000. 
867000 
868000 
869000 


870000 


_ 871000 
872000 
873000 
874000. 


875000 
876000 


877000 
878000 _ 
879000, 
880000 | 


881000 
8&2000 
883000 


~ 6B4000 
885000 
- 886000 

87000 


888000 
889000 


890000. 

891000 

~g92000 
893000 


894000 
8950 0 


990000 
901000 


903000 


904000... 


995000 
996000 


“1357 0 73(X) 


WILL SUCCEED CAND TRANSFER TO X) IF D IS ANY OF THE FOLLOWING: “", 
"ys, "43%, W435" "1357", wan, wag", "357", WS, no7", “7, 

ZCP 30 

4,4, RULES WITH REPLACEMENTS. 


<STR REF> <REPLACEMENT> 


<RULE? = 
= <RPL DELIMITER> <EXPRESSJON> 


‘ 
<REPLACEMENT> 3 
<RPL DELIMITER> $ 


THIS IS AN “ASSIGNMENT STATEMENT". THE STRING REFERENCE MUST 
BE a STRING NaME CAN IDENTIFIER OR aN INDIRECT EXPRESSION)* THE 
VALUE OF THE <EXPRESSION> BECOMES THE NEW VALUE OF THE STRING 
NAMen. IF THIS STRING IS AN OUTPUT STRINGs OUTPUT OccURS AFTER 
THE ASSIGNMENT. NOTE THAT THERE ARE TwO DELIMITERS LISTED», "er 
AND "=", MANY COMPUTERS OO NOT HAVE THE “e™ IN THETR CHARACTER 
SETS» SO THEY WILL ONLY ACCEPT A "=", THE B5500 HAS BOTH» AND 


EITHER CAN BE USED TO INDICATE A REPLACEMENT. SOME EXAMPLES OF 
ASSIGNMENT SUATEUENTS: ARES au 


Yon 423" 

ALPH,1 = BET,3 + GAMM,.7 

LIST «¢ NUM ole [TEM Ms" LIST. 

Sorgen, ND genx N) Woe 

SSFRCAs SB ND om BA ere" N) FL EALe AD "a AB) 
$E oe Fo Go", " EXP 

=e J 
= ,LT(N»sMAX) N + fA" 


THE LaST EXaMPLE IS a "CONDITIONAL aSSIGNMENT™, TIF THE Call OF «LTC) 
FAILS CIeEes IF N 2 MAX)» THE STATEMENT WILL FALL DURING EVALUATION 
Of THE REPLACEMENT» ANDO THE ASSIGNMENT WILL NOT BE CARRYED OUT, 


aCP. 30. eee ae 


465. R RULES. WITH a0TH PATTERN AND REPLACEMENT, 
“ULES Sea este REF> <PaTTERN> <REPLACEMENT> 


THIS IS THE MOST COMPLEX FORM OF A RULEs IN WHICH A PATTERN MATCH 


Y IS ATTEMPTED, ANO IF IT SUCCEEDS, THE MATCHED SUBSTRING OF THE STRING 


REFERENCE IS REPLACED WITH THE VALUE OF THE REPLACEMENT EXPRESSION» 
SPECIFICALLY? THE FOLLOWING ACTIONS OCCUR IN THIS TYPE OF RULE? 


1) THE STRING REFERENCE IS EVALUATEDs DOING INPUT IF IT IS AN 
INPUT STRING, 

2) THE PATTERN: IS EVALUATED FROM LEFT TO RIGHT. 

3) A PATTERN MATCH IS ATTEMPTED. IF THIS FAILS CAS WITH ANY 
J OTHER. FAILURE)» THE RULE Is TERMINATED AND THE FAILURE EXIT 
IS TAKEN. 

4) THE REPLACEMENT IS EVALUATED. 
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a a a ee a ee ee ee ee | 


907000 5) THE SUBSTRING OF THE STRING REFERENCE MATCHED BY THE PATTERN 

908000 1S REPLACED BY THE VALUE OF THE REPLACEMENT EXPRESSION. IF 

909000 THE STRING REFERENCE IS AN OUTPUT STRING» OUTPUT OCCURS» 
910000, 


912000 IS IMMENTATELY TERMINATED» AND THE FAILURE PART OF THE GO=TO PART 
913000 1S EVALUATED. _ 


914000 FOR EXAMPLE» IF AB = "COME's THEN THE RULE 
915000 

ee eee F16.000. on on AB. oe 
917000)... ee 


: 918000 WILL” SUCCEED? AND GIVE AB. THE NEW VALUE "CRATE". IF AB HAD BEEN» 
949000 Say, "CAME™, THE PATTERN MATCH WOULD HAVE FAILED, AND AB WOULD NOT 
920000 HAVE BEEN ALTERED. 
921000 NOTE THAT REPLACEMENT APPLIES ONLY TG THE SUBSTRING MATCHED BY 
000. THE..PATTERNs NOT TO. THE WHOLE STRING REFERENCE» AND THAT THE NEW 
le UE ACES” THE SUBSTRING NEED NOT BE THE SAME. SIZE. AS THE 


poe oe ve "SPECIAL CASE? THE REPLACEMENT PaRT. CAN BE EMPTY (SEE 

THE BNF DEFINITION OF <EXPRESSION>). IN THIS CASEs THE REPLACE 
MENT EXPRESSION IS THe NULL STRING» AND THE MATCHED SUBSTRING IS 
DELETED... EDR ERIM, LE te THE RULES 


-ESCLOFOM), 


gat 7 a : a 
932000 WILL DELETE ALL PERIODS FROM A» ANO THEN TRANSFER TO Me 
933000 
934000 


eeaOG0 8, EXPRESSIONS: 


951000 <CONCATENATE OQ ft= <BLANKS> 


939000 
; 240000 .SEXPRESSION> $45 <ELEMENT> 
“9410000 6 $B SEXPRESSTON> <CONCATENATE OP> <ELEMENT > 
“pte <EMPTY> 
_9a3000. offs <NAMED EXPR> - 
944000 32 <VALUE EXPR> 
945000 $23 <IDENTIFIER> 
(dts  $ <ELEMENT> 
“tte «LITERAL? 
‘$tR  <GROUPING> 
989000.) ate <FCT CALL? 
950000 23% <ARITH EXPR> 
P 


eo ce 20 68 0s ce me oe b8 68 oe) we Vf 00 en 88 48 ce se sees ae) 


932000 <IDENTIFIER> = <LETTER> 
9530 0 Ae SIDENTIFIER®<LETTER?. 
tt. <DIGIT> : 
tts <IDENTIFIER><DIGIT> 
235 e 
tes <IDENTIFIER> 
Cece etch a et POROON ... bd TERRES pie MN STRING? OM 
959000 ~<GROUPING> $32 (€ <EXPRESSION> = ) 
: 960000 <FCT CALL? $ts <FCT NAME>C <PARAMS> ) 
ae 961000 <FCT NAME> t= <IDENTIFIER> 
962000 <PARAMS> $= <EXPRESSION> 
963000 35 <PARAMS> » «<EXPRESSION> 


911000 AS USUAL» ANY PART OF THE RULE CAN FAIL, IF THIS HAPPENS» THE RULE 


@eeeeeseee#eeesee #® @ @ @ | eo @ © 8@® «8@—~—66@ 
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®e01#eeeeee%ee#8#?8e?0 8 @ #8 @ @ @® @ @ @ 


A. 964000 °° <ARITH EXPR> fos <A™TERM> 
| 965000 tf= © <A=TERM> 
966009 <A™TERM> $3= <AT"TERM> <ADD AP> <M*"TERM> 
Mecsas wo ee GOTOOO tis <M*TERM> 
Bes 968000) UeMMT ERM? Ofte <M@TERM>. <MUL OP> KET TERM? 
969000. oe “$$ <E* TERM? 
wea ae 970000 <E= TERM> tie -<E*TERM>  <EXP OP> <ARITH ELT> 
971000 $3=  <ARITH ELT> 
972000 <ARITH ELT> &35 <NAMED EXPR> 
tana eos EID OD ps Sieh ce eaten be 325 <GROUPING? 
974000. gis. <FCT CALL> 
97800000 ee Pe SUTTER AL? 
ee T6000 ADD CORR a bo 
977960 sts 
978000 <MUL OP> the oe 
ee ten tes 979000... iis x 
. 980000 - : ae Cf. 
a 881000 SEXP OP> 7 
ees eae eee - 982000. oe : 
983000 EXPRESSIONS. ARE. USED TO GENERATE STRING VALUES» AND TO FORM NEW 
984000 STRINGS FROM OLOe THE VARIOUS TYPES OF EXPRESSIONS ARE DESCRIBED 
cere eeenernewneunein A BS000 IN THE FOLLOWING SECTIONS, 
ee POA SB6000) 
e000 
eB B000. oe 
989000 uCP ‘42 
990000 3.1. NAMES AND VALUES, 
een 291900 
992000 


j f 
| | 
t & 
3 
if 
t 
? 


| 
if 


f 
a 


993000 I 
994000 
995000. 


996000 
997000 


“998000 
999000 
1000000 
1001000 | 


1002000 


SE 


 Aossoos. 


In. SNOBOL3s BOTH NAMES AND VALUES OF DATA ARE STRINGS» AND $0 IT 
QUITE NATURAL THAT THERE SHOULD BE SOME CONFUSION BETWEEN THE ~ 
MONG PROGRAMMERS’ EXPECIALLY SINCE THE INDIRECTION OPERATOR | 


cHgny” PROVIDES A WAY TO MANIPULATE STRING NAMES AS WELL AS 


THEIR VALUES. IN GENERAL» ANY STRING CAN BE USED AS BOTH A NAME 
AND AS A VALUE, ONE RESTRICTION TO THIS IS THAT NAMES THAT APPEAR 


AS SUCH IN SNOBOL CODE CAN ONLY BE THOSE THAT ARE "IOENTIFIERS" == 
NON*NULL STRINGS OF LETTERS» OLEIT Ss AND: PERIODS, OTHER NAMES” 
MUST. BE HANDLED. INDIRECTLY. 


. . Hee Ay ee a 
ots LITERALS, 


“1007000 THE SIMPLEST WAY TO DESCRIBE A STRING I$ TO GIVE THE STRING ITSELF. 
1008000 THIs Is DONE BY USING A "LITERAL™s WHICH Is A STRING OF CHARACTERS 
1009000 ROUNDED BY QUOTES, QUOTES THEMSELVES CaN NOT OccUR IN LITERALSs Np 
1010000 Muy BE HANDLED DIFLERENTLN SOME EXAMPLES OF LITERALS ARES © 

AQT1O00 . . 
40120002 ODE 
1013000 "AeB" 
1014000 "THIS IS A STRING®” 
_.. J018000. . .. MABCDEFGHIJKLM" 
ee eee Ge. SMITH ai 
7 POL7000 
4018000) ne 
1019000 
1020000 THE LAST LITERAL IS THE NULL STRINGs WHICH HAS A POSITION IN STRING 


waves 


‘ i E ; 
£ i H 
pee ss 


inc. sv 
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t 


a 
é 
4 


Fogger 


oP 


3 


1 
i 
} 


aot 
| 
i 
t 
4 
} 


1021000 


1022000 
1023000 


1024000 . 
1025000 
1026000. 
1027000. 


1028000 
1029000 


1030000 
4031000 
1032000 


1033000. 
1034000 
1035000 


coromegt P28000. 
1038000 


1039000 
1040000 
1041000 
1042000 


1043000. 
ee M04d0007 ee 
“AQASO00 oe eee 


1046000 
1047000 


1048000. 
1049000. 
“1050000. 

4051000. 


1052000 
1053000 


4094000 
1055000 
4056000 

1057000 © 


1058000 


1059000 
1060000 


1061000 ExAl 
— 4062000_ 
1063000. 


1064000 
1065000 
1066000 


1067000 


1068000. 


1069000. 
1070000 


1071000 
1072000 


4073000 


1074000 
1075000 


10760900 
1077000 


MANIPULATION SIMILAR TO ZERO IN ARITHMETIC CIN FACT» IT IS THE IDENTITY 
ELEMENT FOR THE OPERATION OF CONCATENATION)>» 
NOTE THAT» AS IN THE NEXT™TO*LAST EXAMPLE» A BLANK IS aS "GOOD" 
A CHARACTER AS ANY OTHERs AND THE STRING " * ITS NOT THE SAME AS 
THE STRING "0 "ea THEY CONTAIN DIFFERENT NUMBERS OF BLANKS, : 
TO HANDLE QUOTES» SNOBOL3 PROVIDES A SPECIAL STRING NAME» QUOTE» 


WHICH IS. INITIALIZED TO CONTAIN A SINGLE QUOTE AS ITS VALUE» THIS 


CAN» CF COURSE, BE CHANGED BY THE PROGRAM, 


CR 23. 
Sele 52. NAMES. 


IT IS NECESSARY» OF COURSE» TO TALK ABOUT STRINGS WITHOUT SPECIFYING 


COR KNOWING). THEIR ACTUAL VALUES.» SOQ SNOBOL PROVIDES THE ABILITY TO 


GIVE A. STRING A NAMEs® A NAME IS ITSELF A STRING, WHOSE VALUE IS 
ANOTHER (NOT. NECESSARILY DIFFERENT) STRING. (IN GENERAL» ANY | 
STRING CAN BE USED AS A NAME» BY USING INDIRECTION CSEE THE NEXT 
SECTION). NAMES ARE ASSIGNED VALUES IN TWO DIFFERENT WAYS! BY AN 
"ASSIGNMENT's» AND BY USING THE NAME WITH A STRING VARIABLE« SOME 
EXAMPLES OF ASSIGNMENT STATEMENTS ARES 


— A B CC4D) FFCteMn) 
GTCNes "OM ) fy = my 


ANOTHER WAY TO GIVE A STRING NAME A VALUE IS TO ATTACH THE NAME TO 
A STRING VARIABLE IN A PATTERNe IF THE PATTERN MATCH SUCCEEDS» THE. 
“SUBSTRING MATCHED BY THE STRING VARIABLE WILL BECOME THE NEW 

VALUE Of THE STRING NAME. SOME EXAMPLES ARES 


ikea aX * 
TR ty ae OMS We en 
ete. aCH/M {Me *C* 
CARD. RINT OMe. *SEQ* 
EXP ¥*CE1)* 


NOTE THAT THE FIRST EXAMPLE IN THIS SET MEANS THE SAME AS THE FIRST 
IN THE. PREVIOUS SET. 

ES THAT ARE USED IN SNOBOL cope MUST SATISFY: THE RESTRICTION 

OF BEING AN "DENTIFTER™=*=A NON*NULL STRING. OF. LETTERS» DIGITS» AND 

PERIONS. ANY OTHER STRING WHICH IS To BE USED aS A NAME MUST BE 

HANDLED BY INDIRECTION. 


eCR 40. 
Selade INDIRECTION. 


_ SINCE NAMES AND VALUES IN SNOBOL3 ARE BOTH STRINGS» IT IS USEFUL 
TO BE ABLE TO CONNECT THE Two. THIS IS DONE BY MEANS OF wINDIRECTIONN,S 
WHICH CONSISTS OF TREATING THE VALUE OF A STRING AS A NAMEe THE 
OPERATOR WHIGH ONES THIS IS "$"%» WHICH IS A UNARY PREFIX QPERATQORe 

WHEN "4%" Is APPLIED TO AN EXPRESSION» THE VALUE OF THE RESULTING 
EXPRESSION JS THE VALUE UF THE STRING NaMEn BY THE ORIGINAL EXPRES*™ 


© 


t4iz" 


core Business 


@®s2eee0e68e8 @88e@ 86lehUchhUCcOlUhUCcOlUhlUCU OF 


Forms. Inc. sv 


ani 
=! 


ve 
; P 


1078000. 


1079000 
1080000 
1081000 


1082000 


1083000 


1084000. 


1085000 
1086000 


.., 4087000 
1088000 


1089000 


4090000 


1091000 
1og2000 
1093000 


1094000. 
1095000. 
“4096000 | 


10970900 
1098000 


spec OOOO 5 ects ahe 
 £100000° 


1101000 


1102000: 


1103000 
1104000 


_ 41195000 
1106000 
1107000 
PPOBO00 oe 
1109000 


1110000 
1111000 


ise 


SIBNe PUT ANOTHER» MORE INTUITIVE wAYs THE "$" OPERATOR REPLACES 
ITS ARGUMENT WITH THE THING THAT IT NAMES, A THIRO INTERPETATION IS3 
INDIRECTION REMOVES ONE LAYER OF QUOTES FROM ARQUND ITS ARGUMENT. 

FOR EXAMPLE, IF A = "B% B= "CY, AND C = "DO", THEN $A = $"B" = 8 


= "Cc", SIMILARLY» $$4 = $8 = C = "DO", FOR ANOTHER. EXAMPLE» SUPPOSE 


THAT I = "37" AND C37 = "NEW YORK". THENS 


SC"C" [T) = "NEW YORK" 


FOR YET ANOTHER EXAMPLE», IT wILl BE SHOwN HOw "ARRAYS" CAN BE HANDLED 


IN SNCBOL3s A LANGUAGE THAT DOESNT HAVE ARRAYS AS SUCH AMONG ITS 


DATA TYPES«. ARRAY HANDLING CAN BE SIMULATED» HOWEVERs BY USING 
INDIRECTION ON AN EXPRESSION THAT CONTAINS THE "ARRAY NAME" AND 


ALL THE RELEVANT SUBSCRIPTS» SEPARATED BY ANY APPROPRIATE 
DELIMITERS. TO LOQK ALGOL@LIKEs THE DELIMITERS CAN BE BRACKETS 


AND COMMAS, THUSs TO USE THE I» Js K ELEMENT OF THE ARRAY AB» THE 
FOLLOWING EXPRESSION COULD BE USED! 


: scrape al : wt dMe mKon 7") 

IF [ = "3%, J = "2%, AND K = "47"%~2 THIS WOULD GIVE: 

ABL3 +> 2647) 

SOME. FURTHER EXAMPLES OF EXPRESSIGNS INVOLVING INDIRECTION ARER 


$1 
$880 
fs SESE" 
SUAS Tit. : : 
—$C$X. npn $8 nym SCUN" T)) 
$$F CAs 3") 
$$S1ZECE) 
SC"FATHER/™ NAME) 
SCUNAME St (SOC. SEC «NO, ) 


1113000 


14115000 


1114000 


1117000 


_ | 4418000 5 
41119000 
1120000. 
‘1121000 


1122000 
— 1123000° 
4424000 
1125000. 
1126000 . 
1127000 
1128000 


oo 


1133000 
1134000 


4114000 


ARGUMENTS END*TO"ENDe CONCATENATION Is ASSUMED IN SNOBOL3 WHEN TwO 
STRINGS C(LITERALS» NAMES» EXPRESSIONS» ETC,) ARE PLACED NEXT TO 
EACH QTHER WITHOUT AN OPERATOR BETWEEN THEMe SINCE THE OPERATION OF 


“CONCATENATION Is ASSOCIATIVE, IT CAN BE USED AS IF IT WERE AN 
OPERATION WITH ANY NUMBER OF OPERANDS» AND SQ CONCATENATE EXPRES™ 


SIONS CONSIST SIMPLY OF A LIST OF STRINGS TO BE CONCATENATED» WITH 
JUST gl aNKS geTWEEN THEM IF a DELIMITER IS NEEDED. SOME EXAMPLES 
OF EXPRESSIONS INVOLVING CONCATENATION ARE? 


he ", 7 Bo e 

CA. % hey 

COmABCn XD SDEM on. 

cal 1 A L P H A " Ai 
LEST ELT "/" PROPS "o" 


2 STRING OPERATOR IS CONCATENATION» WHICH SIMPLY JOINS ITS: 


@®eeeeeeee%eee#eeee8ee0e80ee#eee@ 
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OPP35O000 8 eR Me KD Me KZ TM Kg MM KS yh KG 

1136000 : 

1137000 A "GROUPING" IS SIMPLY A STRING EXPRESSION SURROUNDED BY PAREN«# 
_.4138000 THESES, SOME GROUPINGS ARE INCLUDED IN THE ABOVE EXAMPLES. TO 
4139000 EVALUATE A GROUPING, ALL THE ELEMENTS WITHIN IT ARE EVALUATED, _ 

4140000 AND A TEMPORARY STORAGE LOCATION IS GIVEN THEIR CONCATENATED VALUE® 
41141000 IF THERE IS ONLY ONE OBJECT WITHIN THE PARENTHESES» A NEW TEMPORARY 

1142000 VALUE IS CREATED ANYWAYe THIS FACT CAN BE USED IN CASES WHERE LATER 

1143000 PART QF THE INSTRUCTION MAY ALTER A VALUE OF A STRINGs AND THE OLDER 
hditood. VALUE.TS THE ONE THAT SHOULD BE USED. FOR EXAMPLE» IF THE FUNCTION 

45000 FC) ALTERS THE. STRING X* THEN THE EXPRESSION (X FCO)) WILL USE THE 


ee 


(AD BEFORE THE CALL» THE EXPRESSION SHOULD BE: 
14480600 
1149000 COX) FC)) 


\ PROGRAM CALLS FCREAD»sREAD)» THE SECOND PARAMETER 
A NEW VALUE TO READ» ANO THE FIRST INPUT CARD WILL BE 
). TCT ME VALUE WILL. BE PASSED TO BOTH PARAMETERS), TO CAUSE. 
1154000 THE F NOTION TQ USE THE OLpER VALUE OF ITS FIRST PARAMETER? THE 
1155000 CALL COULD BE FCCREAD)»sREAD). | 
1186000 ae IFA PARAMETER TG A FUNCTTON [S AN EXPRESSION INVOLV ING CONCATEN™@ 
aot 0 A EN AN IMPLICIT PAIR OF PARENTHESES SURROUNDS THE PARAMETER» 
8000 ONCATENATION IS PERFORMED BEFORE THE NEXT PARAMETER IS z 
a OO EVALUATED. THUS IN FCREAD "#"sREAD)» THE PROBLEM MENTIONED _ 
1160000 TN THE PREVIOUS PARAGRAPH Is AVOIDED» SINCE THE FIRST PARAMETER 
1161000 IS EVALUATED BEFORE THE SECOND READ IS PERFORMED» AND THE RIGHT 
4162000 VALUE. HIGL BE USED FOR THE FIRST READe 
: ‘0 GR () 18 EAN AV ALENT: TO ae 


"£166000 
1167000 %PAGE 
wnt d 68000 3e34 FUNCTION CALLS. 


| dizeoo0 <FCT NAME>€ <PARAMS>  ) 


-— A171000. SECT NAME> oo tts <IDENTIFIER> 
1172000 <P AR AMS> tt <EXPRESSTON> 
1173000 ti= <PARAMS> » <EXPRESSTION> 
147400 


ood LS ARE USED TO CALL FUNCTIONS. SNOBOL3 PRE=DEFINES 
aa 7600 BER OF FUNCTIONS (SEE SECTION 9)» ANO PROGRAMMERS CAN 
1177000 dE S$ CODED In SnoBo, (SEE THE FUNCTION DEFINEC) IN SECe 9 
1178000 AND THE =DEFINE CARD IN SECe 2e2)6 
1179000 THERE ARE THREE BASIC REASONS FOR CALLING A FUNCTION: 

1180000 


ate aNd RETURN g VaLUE. 

aot : TEST A CONDITION» AND SUCCEED OR FAIL> ~ 

1183000 3). 10 CAUSE "S]DE EFFECTS"==THAT JS» TO ALTER GLOBAL yNFORMATION 
1184000 = THAT TS To BE USED BY OTHER PARTS OF THE PROGRAM» OR To 00 
1185000 INPUT OR OUTPUT. 

2186000 | 
1187000 A SNOBOL FUNCTION CAN DO ANY COMBINATION OF THESE THINGS, 
1188000 THE LATTER IS ESPECIALLY EASY IN SNOBOL» SINCE a PROGRAM@DEFINED 
1189000 FUNCTION HAS ACCESS TO ANY VARIABLES IN THE PROGRAM THAT ARE NOT 
1190000 EXPLICITLY pECLARED TO BE LOCAL TO IT (THE LIST OF FORMAL PARAMETERS 
1191000 AND LOCAL VARIABLES)« THIS MEANS ESPECIALLY THAT A FUNCTION GENERALLY 


IN THE CONCATENATION. TO FORCE THE GROUPING TO USE THE: VALUE. 
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e® *® 


ies 


1193000 
1194000 


vvunt 195000 
- £196000 
4197000 


1198000 


~1199000 


1200000 


.t201000 
1202000. 


1192000 HAS ACCESS TO ANY OF THE DATA IN USE BY THE PIECE OF CODE THAT CALLED 
IT» 


WHICH MAY ITSELF BE PART OF A HIGHER"LEVEL FUNCTION, 
FOR DETAILS OF WHAT HAPPENS WHEN A USER@DEFINED FUNCTION IS 


CALLED» SEF SECTION 3. os anne, SPECIAL DET ATS? CONCERNING THE CALL 
ITSELF ARED : es 


1) 


a). 


1203000 


1204000 


1206000 


_. ee 


1211000 
1212000 


1213000. 
“yes4000 

41215000 
2219000 0 


1217000 
1218000 


oh BNO. a poorer 
~~  £220000 — 


THE. wom MUST “APPEAR IMMEDIATELY AFTER | THE FUNCTION NAME + IF THERE 


1S. A BLANK BETWEEN THEMs THE COMPILER WILL INTERPRET [T AS THE 
CONCATENATION OF A STRING WITH A GROUPINGe 


OMITTED PARAMETERS ARE NULL STRINGS,» EXTRA PARAMETERS ARE EVAL 
MATED BUT NOT PASSED To THE FUNCTION, FOR EXAMPLE 3 


FCrX) oe FOX) 
MW CAy Ba Co) BMW ARMs Ba Co tt) 
Ty THE SECOND EXAMPLEs THE LAST COMMA Is NOT NEEDED. 
IF THE FUNCTION BEING CALLED IS NOT DEFINED» THE PROGRAM HAS 


COMMITTED A FATAL ERROR» IF IN DEBUG MODE, THE PROGRAM WILL 
- BE SUSPENDED WITH AN EXPLANATORY MESSAGE, IF NOT IN DEBUG 
: 9000 MODE 

“/£240000 


A MESSAGE. GIVING THE STATEMENT NUMBER AND THE FUNCTION 
NAME WILL BE PRINTED ON THE LINE PRINTER AND TELETYPEs AND THE - 
JOB WILL BE TERMINATED ABNORMALLY. 


SOME. EXAMPLES... ule cea CALLS ARE? 


My CAMB. taecs oe xX " et)) 
ARRGH(r2B " " Xt» "CARD™) 
LEVEL OC) 

eNECA2"375") 
EQUALS(STR»RES) 


(1221000: NOTE. ESPECIALLY THE FOLLOWING: 


1222000 


Scie 


1224000 
1225000 


eYe8 00 


1227000 — 
1228000 | 


1230000 
1231000 


4232000 

- 1233000 
1234000... 

1235000 


1236000 


FCA)” >... Ts A FUNCTION CALL. 
F CA) 1S A CONCATENATION, 
ECB ty alti) IS A FUNCTION CALL, 
t a My", an) IS A SYNTAX ERROR, (WHY?) 


“229000 


aPAGE 


my bRO TONG... a 


1238000... 


1239000. 
1240000 


1241000 
1242000 


SUAG 300025 e ceacet 
“y24a000 


1245000 


4246000.” 


1247000 
1248000 


3 ce Posie ee 

SARITH EXPRE tt _SA™TERM> 
es, : = <AsTERM> | 

"aha “TERM> <A*TERM> <ADD AP> <M*@TERM> 

<M=TERM> 

sls pa — <M*TERM> <MUL OP> <E*TERM> 
SES TERM> 

<E- TERW> SE"TERM> <EXP OP> <ARITH ELT? 


<ARL TH ELT> 


<ARITH ELT> 
<NAMED EXPR> 


20 pees ee 88 ee 88 Be ee ee oe ee fe 


eo 20 ee ee. geod 20 40 90 se oa [ee 08 se oe ee : 
Wo aa a on HO Hoge 


<GROUP ING> 

<FCT CALL> 

Ce <LITERAL> 
--<ADD OP> _# 
<MUL OP> * 
3 x 
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1249000 
1250000 
1251000 


1252000. 
1253000 
1254000 


1255000 
1256000 
1257000 
1258000 


1259000 
1260000 
4261000 


1242000 
1263000 


1264000. 
1265000 
1267000 — 


1268000 
1269000 


_ 4270000 
(| aeri9go0 | 
1272000 
1273000. 


1274000 
1275000 


4276000 
a 
o1h279000 


1280000 
1281000 


1282000 
1283000. 
 E2Rb000 
4285000 0. 5 
1286000 


1287000 


1288000 

1289000. 
1290000 
1291000 


1292000 
1293000 


Pere ane 
1295000. 


1296000 


1297000 
1298000 


1299000 
1300000 


"4301000 
- 4302000 


1303000 
1304000 
1305000 


<EXP QP> 


A NUMBER IN SNOBUL3 IS A STRING WHICH CONSISTS ONLY OF DIGITS,» 
WITH THE POSSIBLE EXCEPTION OF THE FIRST CHARACTER WHICH CAN BE "=", 


ONLY INTEGER ARITHMETIC IS PROVIDED IN SNOBOL3. SOME EXAMPLES 


OF NUMERIC STRINGS ARE? 


"a2" = "O0012" 
rm3n os 00000003" 
On = "0000" = Hort mt ate 


SOME. IMPLEMENTATIONS OF _SNOBOL3 INSIST THAT ARITHMETIC BE FULLY 
PARENTHESIZEGs THIS IS NOT NECESSARY ON THE B5500s THOUGH USING 
UNPARENTHESIZED ARITHMETIC MAY MAKE A B5500 SNOBOL3 PROGRAM 
INCOMPATIBLE WITH ANOTHER IMPLEMENTATIONe THE PRECEDENCE RELATIONS 


ARE BASICALLY THOSE OF FORTRAN OR ALGOL» WITH THE RANKING: 


“ENBONENT Lat ION | : ae CHIGH) 
MULTIPLICATION» DIVISION *+ xs / 
ADDITION» SUBTRACTION tp om 


CONED Ee” BLANKS . — CLOW) 


AMONG ‘OPERATORS UF EQUAL PRECEDENCE, LEFT*ASSOCIATION IS USED, SOME 
ARITHMETIC EXPRESSIUNSs WITH PARENTHESISED EQUIVALENTS? ARE? 


A+B ¢ = (CA +B)" C) 
Af BS = (CA / B) * 0) 
Ne Be KOC = (A = (8B x C€)) 
COOK LR = (" (X 4 RD) 
AOR Beare tat = CA x (B ** "2")) 
AL AR = AM = (AL CAR = AM)) 
be ad OM = €(C + 1) 70") 
Pee Q ** R = (CP wk Q) ** R) = Po ee (Q x R) 
BCP 25 


5Se4ete DIVISION MODES, 


THE. B5500. HAS THREE WAYS TO HANDLE DIVISION» DEPENDING ON HOW 
REMAINDERS ARE TREATEDs THE METHOD USED IS SET BY THE FUNCTION 


-MODEC)s» AS FOLLOWS 


MODEC™ROYND') CAUSES DIVISION TO BE ROUNDED, 
MONEC™TRUNCATION") CAUSES REMAINDERS TO BE DISCARDED. 
MODEC"INTEGER™) CAUSES DIVISION To FAIL IF THE REMAINDER # 0, 


THE . SYSTEM “ASSUMES ROUNDING. UNLESS MODEC) IS USEDs SINCE THAT IS 
HOW THE HARDWARE GPERATES» AND IS FASTESTe SOME EXAMPLES OF THE 
DIFFERENCES BETWEEN THE THREE ARES 


EXPRESSION ROUNDED TRUNCATED INTEGER 
wan / wan ort non wor 
tom 7 ton wa" won FAILS 
wom 7 "3 wot my" FAILS 
"go" ys tan wae wan wat 


rr er ee ee er 


YAlZ 
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i 


1322000. 
1323000. 

1324000 

1325000 


1306000 
1307000 
1308000 


1309000... 


1310000 
1311000 
1312000 
1313000 
1314000 


1315000. 


1316900 
13179000 


1318000. 


1319000 
1320000 
1321000 


1326000 


1327000 | 
4328000 
1329000 
OPS 3000000005 


1331000 
1332000 


4333000. 
14334000 
1335000... 
1336000 — 

“4337000 


1338000 
1339000 


4300000 


1341000 


1342000 
4343000 


1344000 


aeRO 


“1349000> 


1350000 
1351000 


“2352000 — 
4353000. 
1354000 | 

1355000 


4356000 
1357000 


1356000 | 
1359000 _ 


1360000 | 


“1361000 © 


1362000 


was weg wae FAILS 


43" / 
"iq 7 yn wae wt FAILS 
mgt fs mq wan gn FAILS 
te 3 7 won We Ott Wei FAILS 
2 ott: of: We 6tt oO Wm Oe ; Wey FAILS 
neat Z wey tte oe te! FAILS 
ReP..13.. 
5A ee: FAILURE OF ARITHMETIC, 


THE FOLLOWING CONDITIONS WIL, CAUSE FAILURE OF AN ARITHMETIC 
EXPRESSION: 


1) A NON@ 
ACTER. 


NUMERIC ARGUMENT. A STRING IS NUMERIC IF ITS FIRST CHAR 
IS "*" OR a DIGIT ~ND all OTHER CHARACTERS ARE DIGITS, 


BOTH ™" AND. ne ARE NUMERIC» AND BOTH EQUAL ZERO. 


2) p NUMBER OCCURS WHOSE MAGNITUDE IS GREATER THAN 2**39%14% THE LARGEST 


INTEGER THAT THE BS500 CAN HANDLE.e THE DECIMAL VALUE OF THIS 
NUMBER [S 549*755#813»887, 

3) DIVISION BY ZERO, 

4) THE DIVISION MODE IS "INTEGER" AND DIVISION PRODUCES A NON@ZERO 


aCP 30 


RENAINDER: | 


Dah Be ARITHMETIC FUNCTIONS. 


THIS 


a “SECTION DESCRIBES A NUMBER OF FUNCTIONS PRE*DEFINED BY 
“SNOBOL WHICH ARE USEO WITH NUMBERS. ALL OF THESE FUNCTIONS WILL 


FATL IF A NON*NUMERIC PARAMETER IS GIVEN THEM. 


#EQCASB). 


SUCCEEDS IF a AND 8 REPRESENT THE SAME INTEGER, THIS 


FUNCTION SHOULD BE COMPARED WITH EQUALSCAsB)» WHICH DOES A 


SEQC"4%s 01") SUCCEEDS 
oe SUCCEEDS 


1348000 


‘STRING COMPARE, SOME EXAMPLES SHOWING THE DIFFERENCES ARES 


EQUALSE"1"2"01") FAILS 

EQUALSC"OOmsne) FAILS 

es : EQUALSC™A%s A") SUCCEEDS 
) SUCCEEDS EQUALSC™7 "+ arey, SUCCEEDS © 


eOCy ALWAYS” RETURNS A NULL ValUEs aS 00 THE FOLLOWING! 


eNECA98) SUCCEEDS IF A # B, 
“eLTCAsB) SUCCEEDS IF. a < B, 
wLECA»B) SUCCEEDS IF A$ B, 
«GT(AsB) SUCCEEDS IF A > Be 
»GECAsB) SUCCEEDS IF A 2 Bo 
eNUMCA) SUCCEEDS IF A Is NUMERICe | 


“SREMORCasB) RETURNS THE REMAINDER OF A / Be. THIS 1S DEFINED AS? 


he ~ 


WHERE 


CCA 4B) xB) 
‘THE DIVISION 18 TTRUNCATED 


® @ @ @ @ &@© © @~«@=«(@ 


JA10T 


eo 8@ @ ®@ eo & ° 
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JU eS 000r ROR GO cele: 
’ 1364000 
| 1365000 5.4.4, ADDITIONAL COMMENTS ON ARITHMETIC, 
4366000 
1367000 THERE ARE TWO WAYS TO INDICATE MULTIPLICATION» WITH “*#" OR 
1368000 WITH "x", WHEN USED IN A PATTERN OUTSIDE OF PARENTHESES» "*" WILL 
1369000 ALWAYS BE ASSUMED TO BE A STRING VARIABLE ASTERISK» SO EITHER 
1370000 "x" GR PARENTHESES SHOULD BE USED IF MULTIPLICATION IS DESIRED. 
1371000 ALSO» IF "*#" APPEARS OUTSIDE OF PARENTHESES IN A PATTERNs IT WILL 
1372000 BE AN UNNAMED ARBITRARY STRING VARIABLE» NOT EXPONENTIATIONs 
1373000 ~=NOTE THAT THE ONLY UNARY ARITHMETIC OPERATOR Is "=", 


q 
y 
} 
4 
} 


BLANKS ARE NOT NEEDED ARGUND ARITHMETIC OPERATORS IN B5500 
of 0 SNOBOL3, UNLIKE IN MANY OTHER IMPLEMENTATIONS OF THE LANGUAGE. 
1376000 
1377000 


1382000 

1383000 <PATTERN> = <ELEMENT> 
= <STR VAR> 
= <PATTERN>. <PATTERN> _ 
=  <PATTERN> <BACK REF> 
= <ARB VAR> tl 
= 


“1388000. <BAL VAR> 
1389000 <FIXED=LENGTH VAR> 


7 ee * :: 
ke _SNAMED EXPR> * 
C) Oe 


: es Co: <NAMED EXPR> de 
1394000 ti=  */ <EXPRESSION> * 
1395000 $3= * <NAMED EXPR> / <«<EXPRESSION> « 
alee eeu EXPR> 


MOST. IMPORTANT PART. oF Ae SNOBOL INSTRUCTION IS THE 


2399000 PATT 
1400000 To CERTAIN PROPERTIES OF THE STRINGS BEING EXAMINED. A PATTERN 
1401000 IS MADE YP OF A LIST OF “PATTERN ELEMENTS"» EACH OF WHICH WILL 
er Cad Tales RT OF A STRING IF THAT PART HAS THE PROPERTY DESCRIBED BY 
-EMENTs A PATTERN WILL MATCH A STRING IF EACH OF ITS 


£40 DIN OTHER wOROS, THE PATTERN IS MATCHED ONE ELEMENT AT A TIME, FROM 
1406000 LEFT TO RIGHT» AND EACH PATTERN ELEMENT MUST MATCH A SUBSTRING THAT 
1407000 STARTS yUST AFTER THE SUBSTRING MATCHED BY THE PREVIOUS ELEMENT. 
reef Haag THE BASIC PATTERN ELEMENTS DEFINED IN SNOBOL3 ARE CONSTANTSs STRING 
ee 1409 \ HREE | TYPES CARBITRARY» BALANCED» AND FIXED* LENGTH)» 


ee . ERENCES+ THE FOLLOWING SUBTSECTIONS DESORTBE EACH OF. 
ee 1411000. THESE PATTERN. ELEMENTS IN DETAIL s 
1412000 
1413000 
1414000 


1415000 €CP 20. 

1416000 6414 CONSTANT PATTERN ELEMENTS. 

1417000 

1418000 A "CONSTANT" PATTERN ELEMENT IS ONE WHICH WILL MATCH ONLY ONE 
1419000 STRING. THAT Iss IT IS AN ELEMENT WHICH EVALUATES TO A STRING OF 


tre crt rere ere ane irsnentet en peniite desman une een gece cust rm 


1s” USED. TO IDENTIFY. AND ALTER PARTS OF STRINGS ACCORDING 


a SUBSTRING» AND THE MaTCHED SUBSTRINGS ARE ADJACENT. — 


UT 
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1438000. 


1420000 


1421000 


1422000 


4423000 
: ae eOeR ae 
4425000. 

1426000 | 

~£427000- 


1428000 
1429000 


24300000 
1431000 
1432000. 
1433000 


1434000 


1439000 
1440000 


4441000, 
4442000 
1443000 

1444900 


~ 1445000 


1446000 
1447000 


4448000 

4449000. 

1450000 
1451000 


1452000 
1453000 


1454000. 
1455000. 


1456000 


“4457000. 


1458000 


_., 1459000 
—- ga60000- 
4461000 
1462900 
~~ 1463000— 


1464000 
1465000 


1466000 
1467000 
1448000. 


~ Ta69000 


1470000 
1471000 


1472000" 

1473000 

1474000 
1475000 


1476900 


CHARACTERS» AND IT WILL MATCH ONLY THAT STRING. EXAMPLES OF CONSTANT 


PATTERN ELEMENTS ARE LITERALS, STRING NAMES» FUNCTION CALLS» AND 
ANY QTHER STRING@*VALUED EXPRESSION, FOR EXAMPLE» THE PATTERN 


hk aN, a cD 

CONSISTS OF THREE CONSTANT PATTERN ELEMENTS: Ay "#"%» AND (8 C). 
IF A = "TS", B = "3%, AND C = "K"s THEN THIS PATTERN WILL MATCH 
THE STRING "IS+3K". IF EXP = "SQRTCS)S1S+#3K™U"%» THEN THE RULE 


EXP A nen (8 c) 


WILL SUCCEED, WITH THE. PATTERN MATCHING STARTING AT THE 9TH CHAR= 


ACTER OF THE STRING REFERENCE. 


oo AM 35000... 


Gxepas 
O52. STRING VARIABLES. 


A STRING VARIABLE IS A PATTERN ELEMENT WHICH WILL MATCH MORE THAN 
ONE STRINGs DEPENDING ON THE PROPERTIES OF THE STRINGe THERE ARE 
THREE TYPES IN SNOBOL3: "ARBITRARY"» "BALANCED", AND "FIXED@"LENGTH". 
SEPARATE. SUB™SECTIONS BELOW ARE DEVOTED To EACH TYPE e. THIS SECTION 
DESCRIBES SOME PROPERTIES COMMON TO ALL TYPES OF STRING VARIABLES, 

A STRING VART ABLE CAN BE "NAMED" OR “UNNAMED. A NAMED VARTABLE 
Ts ONE wHICH CONTAINS A <NAMED EXPR> (SEE THE BNF DEFINITIONS). 


BOTH FORMS AcT THE SAME DURING A PATTERN MATCHS THE DIFFERENCE IS 


THAT IF THE PATTERN MATCH IS. SUCCESSFUL, THE STRING NAMED BY THE - 
THE STRING VARTABLES ARE ASSIGNED THE MATCHED SUBSTRINGS AS NEW 


VALUES. FOR EXAMPLE? IF X = "1234567" THEN THE RULE 


xX won wx wer 


WILL ‘SIMPLY SUCCEED AND HAVE NO SIDEM"EFFECTs WHILE 


eorpe te oe 


WrhLL SUCCEED AND ASSYGN TO 7 THE VALUE ."34%- WHICH JS THE SUBSTRING 
MATCHED BY THE STRING VARIABLE #1, 
THE ASSIGNMENT OF STRING VARIABLE VALUES IS CARRIED OUT IMMEDIATELY 


AFTER THE PATTERN MATCHs BEFORE THE REPLACEMENT PART CIF ANY) IS 
EVALUATED» $0 THE NEW VALUES WILL BE USED IF THE STRING VARIABLE ~ 


NAMES APPEAR IN THE REPLACEMENT. FOR EXAMPLE* IF L = *aslNs ARSXYZ* CBs” 
THEN THE RULE 


a we ee 1 et eSk HLH & RPL ORGS). 
WILL OO A PATTERN MATCH (WHICH WILL SUCCEED)» SET R = "LNm» SET 


S$ = "AR, AND THEN CALL RPLCY LNs "AR") » WHOSE VALUE WILL THEN REPLACE 


THE MATCHED SUB*STRING "“slNe ARs" 

THERE MAY BE SEVERAL STRING VARIABLES WITH THE SAME NAMEe THE 
ASSIGNMENTS ARE CARRIED OUT IN a STRICT LEFT™TO@RIGHT ORDERs SO 
EACH STRING WILL. END UP WITH THE LAST VALUE ASSIGNED TO Ite FOR 
EXAMPLEs WITH L AS ABOVEs THe RULE on 


i: Het aXe Heh Ke "yt aXe Wy tt 


! 
i 


14727 


* ©® @ @® @ ®@ 
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re Busin 


ho. 


i 


: 


c 


| 
i 


i H po ee 
: a Poe 
j 
} if 
t 
i 


1477000 
1478000 


1479000 


1480000 


- £481000 


1482000 


WILL SUCCEED AND GIVE X THE VALUES “LNs ARs AND "XYZ", THE LAST 
VALUE» XYZ» WOULD BE THE VALUE OF X AT THE END OF THE INSTRUCTION. 
IF X WERE AN OUTPUT STRINGs OUTPUT WOULD OccUR THREE TIMES 

DURING THIS RULE. 


1483000... 


1484000 
1485000 


1486000. . 


oo 1487600) 
1488000 | 
4489000 - 


1499000 
1491000 


1492000. 
4493000. 


1494000 


4495000 


1496000 
1497000 


., 4498000 

—. 1499000. 
1500000 
Ho AS0100000- 


1502000 
1503000 


4394000 _ 
= TS 05000 
- 1506000 
1507000. 


1508000 
13509000 
_ 4510000 


1511000 
1512000 
1513000 
~ 1514000 


1515000 
1516000 


“o ASITO00 
1518000. 
~1519000 _ 


1520000 


1521000 
1522000 


ae 1523000. 
4524000 
1525000 


1326000 
1527000 


. 1528000 


1529000 
1530000 
1531000 
1532000 
1533000 


AT THE RIGHT END OF A PATTERN» 


“Akl BUT. THE LAST ONE WILL ALWAYS MATCH THE NULL STRINGs 


STATEMENT COULD BE USED: 


RCP 40 
6.2e1e ARBITRARY STRING VARIABLES. 
€ARB VARD>  ¢2=. #e 
ee tis * <NAMED EXPR> + 
“AN ARBITRARY STRING VARIABLE WILL MATCH ANY STRING CINCLUDING 
THE NULL STRING)» AT THE BEGINNING OF a PATTERN CTHE LEFT END), 


AN ARBITRARY VARIABLE MATCHES THE LEFT END OF THE STRING REFERENCE 
IT MATCHES THE "REST" OF THE STRING 


ce FOR EXAMPLE» IF SENT = “WHEN I SAW HER "y THEN 
SENT eae TT Be OH aCe 
WILL SUCCEEDs ANO ASSIGN A = "WHEN"s B = "I", AND C = "SAW HER ", 


NOTE. ESPECIALLY. THAT AN ARBITRARY STRING VARIABLE WILL MATCH A NULL 
TIRING FE ‘POSSIBLE, SO FOR EXAMPLE» 


IF x = "+4+"%, THEN 


x *Is Wy tt x J* wat 


MILL SUCCEED AND SET BOTH I AND J To "", 


TF. SEVERAL ARBITRARY STRING VARIABLES ARE ADJACENT TO EACH OTHER» 
AN. EXAMPLE 
OF A USE FOR THIS Ist 


STR «Ve kt 19 a 99 
THIS. INSTRUCTION. WILL SEARCH STR FOR A MINUS SIGN» AND IF IT FINDS 
ONES. 1T WILL SET Vo TO NULL. FOR ANOTHER EXAMPLE» TO ASSIGN A TO 


BAND. SIMULTANEOUSLY SET Te J» Ke Ls» AND M NULL» THE FOLLOWING 


eee +s *Ke eLe eM eB 
THE GPNERAL RULE FOR MATCHING. AN ARBITRARY VARIABLE IS% 


1) MATCH THE PRECEDING ELEMENTs IF THERE IS ONE» AS FAR TQ THE 
LEFT AS POSSIBLE. 

2) MATCH THE FOLLOWING ELEMENTs IF THERE IS QNEs AS CLOSE AFTER 

THE PRECEDING ONE AS POSSIBLEe ~ 


3) THE ARBITRARY VARIABLE THEN MATCHES EVERYTHING BETWEEN THE STRINGS 


MATCHED BY THE SURROUNDING ELEMENTS» OR IF EITHER OF THESE IS | 
MISSING» THE VARIABLE EXTENDS TO THe APPROPRIATE END OF THE STRING, 
ZCP 45 
642024 BALANCED STRING VARIABLES. 
<BAL VAR> $35 «()«* 


e® @® #®# @® @ @ ®& 


re ee ee ee ee ee ee ee 


® ® 


JALIT 
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ee atted 


i 
i 


“3 
j 


i 
a 
i 


E 
i 
5 
i 


a 
4 
| 
t 
3 


1534000 
1535000 
1536000 


. 1337000 


1538000 
1539000 


1540000 


1541000 
1542000 


1543000 _. 


1544000 
1545000 


~ 1546000 
1547000 | 


1548000 


1549000 


4550000 
1551000 
1552000. | 


1553000 
1554000 


..,, 4535000 
1556000. 
1557000 

1558000 


1559000 
1560000 


1561000 
1562000 
1563000. 
4564000 
1565000 


15466000 


1567000 


1568000 
1569000 


$= *C <NAMED EXPR> )« 


A BALANCED STRING VARIABLE WILL MATCH ANY STRING WHICH IS NON#NULL 
AND HAS BALANCED PARENTHESESs THAT IS» THERE MUST BE THE SAME NUMBER 
OF RIGHT PARENTHESES AS THERE ARE LEFT PARENTHESES (POSSIBLY NONE 
OF EITHER)» AND THE FIRST PARENTHESIS MUST BE A "(%, THUS A BALANCED 
VARTARLE WILL MATCH ANY OF THE FOLLOWINGS . 


"ABCD" 


" " 
" ) Lhe 
—ACBEMX) +0" 
"A + (Bom Cc)" 
CFC Ls2) + CALPHA *e 27)" 
"HE SAID CVERY SOFTLY) THAT " 
econ cay cacaa ys 


A BALANCED VARIABLE WILL NoT MATCH ANY OF 


we 
wen 
eye 
MAAR) 
"OA 3 eal 
"VERY SOFTLY) THAT " 
my 4 Choe My 


UNLIKE ARBITRARY STRING VARIABLES» BALANCED VARIABLES ARE NOT 


EXTENDED TG THE RIGHT WREN THEY END A PATTERNs THOUGH AT THE START 
a AL PATTERN THEY EXTEND AS FAR LEFT AS POSSIBLE. FOR EXAMPLE» IF 


EXPR = *CAECLIMCP/Q0Q91)°SINCLNCL*ALPH)))x¢2##N) x3)" Ne 


AtEN THE Allie 


EXPR CLD Hx" #(R)m 


1570000 


~ 1571000 


1572000 


1573000 
4574000 
1575000 
“yBreone 
1577000 


1578000 
1579000 


oyEaoeees 
1581000 | 
1582000 


1583000 
1534000 


... 4385000 
1586000 
14587000 


1588000. 


4589000 


1590000 


WILL SUCCEED» “AND SET L = "ASCLIMCP/QsQs1)"SINCLNCL*ALPH)))%p 
AND Ro = "C24#N), L WILL INCLUDE THE INITIAL A+", BUT R 
WILL NOT BE EXTENDED TO INCLUDE THE "x3"» THOUGH "(a*#N)x3" 


WOULD BE A VALID MATCH FOR A BALANCED VARTABLE. 


*CP 30 
Bi 2635 FIXED "LENGTH STRING VARIABLES. 


| <FTHED=LENGTH VAR> tts #/ <EXPRESSION> * 
tis * <NAMED EXPR> / <EXPRESSION> «+ 


A FIXEQ@LENGTH STRING VARIABLE WILL MATCH ANY STRING WITH A GIVEN 


NUMBER OF CHARACTERS. THE <EXPRESSION> MUST BE NUMERIC AND NON@ 
NEGATIVEs OR THE PATTERN WILL FAIL DURING EVALUATION AND THE PATTERN 


MaTCH WILL NOT TaKE PLacEs ONE SORT OF USE OF a FIXED*LENGTH VARIABLE 
US To PICK OFF INITIAL. STRINGS: USUALLY ONE CHARACTER! — 


STR  *CH/ 1M = /F COUT) 


rr ee er er Se Sr i i a i 9 


=) 


®& 
id 
ae! 


y4atoT 


eo @ ® @ @®@ 
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tos “yso1000 ae 
; 1592000 THIS. WELL ASSIGN TO CH THE. FIRST CHARACTER OF STR AND DELETE THAT 
1593000 CHARACTER FROM STRe IF STR IS NULL» THE STATEMENT WILL FAIL AND 
Ses _....4594000 TRANSFER TO QUT. FOR ANOTHER EK AMEE: TO GET THE LAST N CHARACTERS 
1595000 OF A STRING St. a 
1396000. ee oe 
ce 1597000. S$ ySTzE CS DNs *TATL* 4FCTOO,SMALL ) 
1598000 
1599000 THE UNNAMED FIXEN@LENGTH VARIABLE WILL MATCH ALL BUT THE LAST N 
wre eb 6.00000 CHARACTERS OF S» ANO THE ARBITRARY VARIABLE WILL GET THE LAST Ne 
 Meoteoo Ir S HAS_ EWER THAN N CHARACTERS? THE FIXED*LENGTH. VARIABLE WILL 
16020 NEGATIVE LENGTH» ANO WILL FAIL DURING EVALUATION OF THE PATTERN, 
oe 1603000 NOTE THAT THE FIRST EXAMPLE ABOVE COULD BE WRITTEN? 
1604000 


1605000 STR *CH/™4" *STR* /FCOUT) 


“1610000 643, BACK REFERENCES, 
1611000 


ope ANOTHER TYPE OF PaTTERN ELEMENT ‘Ts THE "BaCK REFERENCE: THIS 

Ig A STRING NAME WHICH IS THE SAME AS THE NAME OF A PREVIOUS STRING. 
\CK REFERENCE WILL MATCH A STRING WHICH IS TOENTICAL 

TCHED BY THE STRING VARIABLE. FOR EXAMPLEs IN ; 


26 16 160 0 Sane sae Aa” Se Sone oh Pi cae See ME A 
X wee SEW H 


FFERENCE* H» MUST MATCH THE SAME STRING AS THE ARBITRARY 


8 00 of PEXP. 1S. AN ALGEBRAIC EXPRESSION» THEN 
1622000 
1623000 EXP *(P)* *x* P tF CNONE) 


SUB EXPRESSION THAT DECURS TWICE» AND IF THERE ARE 
ANSFER TO NONE.. 
N BE SEVERAL BACK REFERENCES TO THE SAME STRING. VARIABLE. 
UcH "BACK REFERENCE MUST MATCH THE SAME STRING. FOR EXAMPLE 


1 28000. EACH 
1629000 
00 


60 Ma ep 


E SEVERAL STRING VARIABLES WITH THE SAME NAME» A BACK 

1633000 REFERENCE WILL MATCH THE LAST SUCH VARIABLE THAT PRECEDES IT, FoR 
1634000 EXAMPLE, THE RULE 

1635000 


oe : o. FoR Soe “STRING AL = "AB CD CDEF, AND SET x 3 r EONS THE 
ee tes 90 0. FIRST. STRING VARTABLE WILL. MATCH THE STRING "ABN. 
1640000 
1641000 
1642000 | 
1643000 %CP 40- 
1644000 6.4, PATTERN MATCH MODES. 
1645000 
1646000 NORMALLY» A PATTERN WILL MATCH ANYWHERE IN THE STRING REFERENCE 
1647000 THAT IT FINDS AN APPROPRIATE SUB@STRING, SOMETIMES IT 15 DESIRABLE TO 


IF X = "ABEBCA"s THE RULE WILL SUCCEED AND SET H = "BM, 


LY IF yx CONTAINS THREE CONSECUTIVE IDENTICAL CHARACTERS, _ 


>» e@eeeeeeeee@6e@eeeeeeeeeaeaa 


JAI? 


® &® ® @ @®@ 
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‘ 


aN basta 
j 


1648000 


1649000 
1650000 


ot 631000. 
he52000..- 


1653000 


1654000. 


1655000 
1656000 
1657000 
1658000 
1659000 


1660000 


1661600 
1662000 


AES 3.000 nore 
oo A664000 |. 
1665000. 

4666000. 


1667000 
1668000 


1669000 
1670000 
co OT 1000 + 

— 1672000 


1673000 
1674000 
1675000 


4676000. 

4677000 

—Ae7e000) 
1679000 


1680000 
1681000 


4682000. 


1683000 


1684000 | 


1685000 
1686000 
1687009 


1688000. 
~ .1689000> 
1690009 | 
1691009 


1692000 
1693000 


1694000. 
4695000 
(1696000 


1697000 
16968000 


1699900. 

1700000. 
1701000. 
-- 4702000 
1703000. 


1704000 


FORCE THE PATTERN TO MATCH STARTING AT THE FIRST CHARACTER OF THE 


STRING REFERENCE» A PATTERN THAT CAN ONLY MATCH AN INITIAL SUB*STRING 
IS CALLED "ANCHORED". PATTERNS THAT CAN MATCH ANYWHERE (THE USUAL KIND) 


ARE CALLED "UNANCHORED". 
THERE ARE TWO METHODS OF INDICATING WHETHER OR NOT A PATTERN Is TO BE 


ANCHORED + ONE [5S BY USING THE MODE FUNCTION? MODEC"ANCHOR") SETS A 
SWITCH AT CAUSES ALL PATTERNS TO BE ANCHORED$ MODEC"UNANCH") RESETS 
THE SWITCH SO THAT PATTERNS aRE UNANCHORED, EITHER OF THESE MODES 
CAN BE CANCELED FOR A SINGLE INSTRUCTION BY USING THE FUNCTIONS 
ANCHORC) AND UNANCH()« ANCHORC) CAUSES THE INSTRUCTION THAT IT IS 
In TO. BE ANCHORED, NO MATTER wHAT THE MODE IS» SIMILARLY,» UNANCHC) 
CAUSES. TTS PATTERN 19 BE UNANCHOREOs NO MATTER WHAT THE MODE, j{F 


MODEC) IS NOT USED» SNOBOL ASSUMES THAT THE MODE IS UNANCHORED. 


TO SHOW THE DIFFERENCE, SUPPOSE THAT E = ")CA+B)(", THEN 
ESCH | = | 
WILL SUCCEEO» AND SET F = "CA+B)", HOWEVERs THE RULE 
eG ANCHORC) *CFD* 
WILL FAIL, SINCE THE PATTERN IS RESTRICTED TO MATCHING AN INITIAL 


SUBSTRING» AND NO BALANCED STRING CAN START WITH ")", IF MODEC ANCHOR") 
HAD BEEN CALLED» THEN THE FIRST RULE WOULD ALSO HAVE FAILED. 


“FOR ANOTHER EXAMPLE» SUPPOSE X = "ABCDE™, THEN THE RULE | 
xX se Ca xT* 


WILL SUCCEED CIF yHE MODE Is UNANGHORED.? AND SET 1 = "OE". BUT. 
JHE ANCHORED, RULES pte “3 


ie ANCHORG) mom one 


WILL FAILS BECAUSE THE FIRST CHARACTER OF X IS NOT "CW. 


%cP $0. 
6.5, ASSIGNMENT OF STRING VARIABLES, 


LF &. PATTERN MATCH SUCCEEDS» THE STRING NAMES ASSOCIATED WITH 
ITS STRING VARIABLES. ARE ASSIGNED THE VALUES OF THEIR SUBSTRINGS 
IN A STRICT LEFT*TO“RIGHT ORDER» THIS MEANS THAT IF SEVERAL STRING. 
VARIABLES HaVE THE SAME NaMes» THE RIGHT#MOST ONE WILL DETERMINE 

THE VALUE ASSIGNED fO THE NAMES THE OTHERS WILL BE ASSIGNED THEIR 
APPROPRIATE VALUES» AND THEN RE™ASSIGNEDs IF THE STRINGS HAVE ANY 
QUTPUT USE, OUTPUT WELL OCCUR FOR EACH ASSIGNMENT. FOR EXAMPLE» 

IF THE, RULE. 


ee RRINT# "4" APRINT® 9" ¥PRINTS 


SUCCEEDS» THE THREE STRINGS ASSIGNED TO PRINT WILL ALL BE WRITTEN 

‘ON THE LINE PRINTER, 

FURTHERMORE, THE ASSIGNMENT Is DONE IMMEDIATELY: AFTER. THE. PATTERN 
MATCHs BEFORE THE REPLACEMENT AND GO*TO PARTS ARE EVALUATED? TO ANY 
STRING NAMES USED, SAY» BOTH AS A STRING VARIABLE NAME AND IN THE 
REPLACEMENT WILL HAVE THE NEW VALUE WHEN THE REPLACEMENT 7S EVALUATED, 
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41739000, 
 y740000— 
1741000. 


1705000. 


1796000 
1707000 


__ 1708000 
4709000 


1710000 


«2712000 


1712000 
1713000 


4714900 .. 
41715000. 
1716000 


A717000° 
SUCH INSTRUCTIONS SHOULD BE AVOIDED. IN GENERAL» J WOULD BE EXPECTED 


1718000 
1719000 


1720000 
1721000 — 
1722000. 
1723000 


1724000 
1725000 


1726000 

4727000 
1726000. 
1729000 P 


1730000 
1731000 


Piel igp OOOO cand i 
— 4733000 | 
1735000. 


1736000 
1737000 
1738000 


1742000 
1743000 


1744900. 

1745000 | 
o 4746000 A PA 
4747000 WITH. 


1746000 
1749000 


_ 1759000 | 
1751000 — 
ce 1) TRY yO MATCH THE FIRST PATTERN ELEMENT STARTING AT THE FIRST CHAR® 
ee PTS 3000 


1752000 


1754000 
1755000 


1756000 


1757000 
1758000 
1759000 


1760000 
1761000 


FOR EXAMPLEs IF AST = "XZeAB%s THEN IN THE RULE 


AST *,™ ete = 7," OBLCIel) 


THE VALUE PASSED TO THE SECOND PARAMETER OF DBLC) WILL BE "ABT. 


A RATHER INTERESTING SITUATION OCCURS WHEN THE STRING REFERENCE 
HAS THE SAME NAME AS A STRING VARIABLE. FOR EXAMPLE* THE RULE. 


T a ar a x J* 


WILL. FIRST ASSIGN A NEW VALUE TO I» THEN ATTEMPT TO ASSIGN A VALUE TO Je 
BUT BY THIS TIME» I HaS BEEN CHANGED» AND I WAS THE STRING REFERENCE « 


THERE. Ts CLEARLY NO LONGER ANYTHING MEANINGFUL TO ASSIGN TO J» AND 


TO CONTAIN RATHER ARBITRARY GARBAGE, A SIMILAR RULE THAT ACHIEVES 


ae MOST. opke ke wOULO ASSUME. TO BE THe BEST MEANING OF THIS RULE IS 


IN ae THE STRING REFERENCE IS NOT I ITSELF» BUT A GROUPING 
THAT HAS THE SAME VALUE AS Ie SINCE THE STRING VARIABLES ARE NO 


LONGER NAMED THE SAME AS THE STRING REFERENCE CTHE STRING REFERENCE 
HAS. NO NAME AT. ALL )* THE PROBLEM DOESNT ARISE.e | 


Jit ae AT TIMES USEFUL TO HAVE THE LAST STRING VARTABLE IN A 


foc ante TWO STATEMENTS ARE EQUIVALENT? 


ST «WOe 1 5 /FCE) 
ST. ae NOM eS Te SE CE) 
ZCP 35 


6464 PATTERN MATCH, ALGORITHM, 


“THERE. ARE” USUALLY MANY WAYS FOR A PATTERN MATCH TO SUCCEED, WHEN 
THES IS TRUE» THERE IS A CLEAR NEED FOR A WAY TO DETERMINE WHICH 
OF THE POSSIBLE MATCHES WILL BE THE ONE CHOSEN BY SNOBOL» SO THE 
PROGRAMMER CAN PREDICT WHAT VALUES WILL BE ASSIGNED TQ THE STRING 
VARIABLES AND WHICH SUBSTRING WILL BE REPLACED. 

aS A GENERAL» INTUITIVE. RULE» THE PROGRAMMER SHOULD REMEMBER THAT 
MATCH PROCEEDS FROM LEFT TO RIGHT» AND EACH ELEMENT Is MATCHED 
THe SHORTEST. SUBSTRING POSSIBLE CONSISTENT WITH THE SUCCESS OF THE 
REST OF THE PATTERNe THAT 1S, THE PREFERRED MATCH WILL BE THE ONE 
FOR WHICH AN "EARLIER" PATTERN ELEMENT MATCHES AS FAR LEFT AS POSSIBLE. 
THE. GENERAL RULES GOVERNING A PATTERN MATCH ARE3 


ACTER OF THE STRING REFERENCEe® AN ARBITRARY VARIABLE STARTS. 

BY MATCHING THE NULL STRINGe IF THIS MATCH FAILS» GO TO STEP 5. 

2) IF THERE ARE NO MORE ELEMENTS» GO TO STEP 6, 

3) If THERE IS A NEXT ELEMENT» TRY TO MATCH IT AT THE CHARACTER 
AFTER THE SUBSTRING MATCHED BY THE PRECEDING ELEMENT. IF THIS 
SUCCEEDS» Gl TO STEP 2, 

4) IF THERE IS NO PREVIOUS ELEMENT» GO TO STEP Se IF 

THERE IS A PREVIOUS ELEMENTs TRY TO EXTEND IT TO MATCH A LONGER 

STRING CONLY ARBITRARY AND BALANCED STRING VARIABLES CAN BE 
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1762000 
1743000 
1764000 


1766000 
1767000 


1769000 
1770000 


1771000 
1772000 


1743000 
A pe ace 
1776900 


4780000 
1781000 
1782000 


1787000 
1788000 


AT91000 
ET9R000 


1793000 
1794000 


1799000 
1800000 


48901000 
— Aedzoo0 
1803000. 
1804000 A 
1605000 


1806000 
ng Oo COON 
(1608000 


1609000... 
OABLG000 


1811000 
1812000 


1816000. 


1817000 
1818000 


£7 65000 


_-1768000- 


1777000 
A T7O000- - 
“ATT9000 


—1783000_ 
1784000. 
~-1785000° 
1786000. 


1789000 
1790000... 


1795000. 
(4796000 — 
“£797000. . - mL 
ET 9B000 ee 


_, 1813000 


EXTENDED). IF THIS SUCCEEDS» GO BACK TO STEP 3 AND TRY TO RE*MATCH 

THE CURRENT ELEMENTe IF THE EXTENSION CANT BE MADE* GO TO STEP Ge 
5) IF THE PATTERN IS ANCHORED, THE PATTERN MATCH FAILS» IF IT IS 
NOT ANCHORED, THEN TRY TO FIND ANOTHER MATCH FOR THE FIRST ELEMENT 
STARTING AT A LATER CHARACTERe IF THIS CANT BE DONES THE MATCH. 
FAILSe If IT CAN BE DONE» GO TO STEP 2, 
6) IF THE LAST PATTERN ELEMENT IS AN ARBITRARY VARIABLE» EXTEND IT 

TO INCLUDE THE REST OF THE STRING REFERENCE. THE PATTERN MATCH 

HAS SUCCEEDED AND THE ASSIGNMENT TO THE STRING VARIABLE NAMES 

CAN BE MADE. 


PLTTA000 


SECTION 7? 
PAGE 1 
7+ GOTO PARTSs LABELS. 


- eG0=To PaRT> : tt=. <@0=T0 DELIMITER> <GO"TOS> 
<GO"TO DELIMITER> ::= <BLANKS>  / 
GO"1T9S> $t= <UNCONDITIONAL GO=TO> 
$$= «SUCCESS gO™TO> 
32=. <FAILURE GO*TO> 
oe t=  <SUCCESS GO"TO> <FAILURE GO*#TO> 
So $= <FAILURE GO™To> <SUCCESS Go*To> 
<UNCONDITIONAL GO"TI> ss= ¢€ <LABEL EXPR> ) 
<SUCCESS GO-TO> t= SC <LABEL EXPR> ) 
<FATLURE GO=TO> $%= FC <LABEL EXPR> ) 
<LABEL EXPR> $45 <RESERVED LABEL > 
aes it= <LABEL> . 
Ds ga COMPUTED LABEL> 
<RESERVED LABEL> $s= END 
$8= RETURN 
ee eke ; *3=  FRETURN 
—<COMPUTED LABEL> #t= $ <ELEMENT> 
*CP 10 
Ty PABELS.. 
ANY. INSTRUCTION. IN. LN SNOBOL PROGRAM CAN BE LABELED, A LABEL Is 
A-NON#NULL STRING PRECEDING THE FIRST BLANK OF AN INSTRUCTION. IT 
FOLLOWS FROM THIS” DEFINITION THAT LABELS CANT CONTAIN BLANKS, IF 


THE FIRST CHARACTER OF AN INSTRUCTION IS A BLANKs THE INSTRUCTION 
Ts UNLABELEDe ASIDE FROM THE SPECIAL CHARACTERS IN COLUMN ONE» THERE 


ARE NT RESTRICTIONS. ON MME CHARACTERS THAT CAN BE USED IN LABELS « 


-CP 45 


cm ei GO-TO PARTS, 


THE 60 10 PART: OF AN INSTRUCTION DETERMINES WHICH INSTRUCTION IS: 
TO BE EXECUTED. NEXTe | IF THERE IS NO GO-TO PART» OR IF THE GO-TO. 
PART DOESNT APPLY WHEN THE INSTRUCTION IS EXECUTED» THEN THE NEXT 
INSTRUCTION TO BE EXECUTED IS THE NEXT ONE IN THE PROGRAM, 
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1619000 © BRANCHING IN SNOBOL3 CAN BE EITHER UNCONDITIONAL OR CONDITIONED 
1820000 ON THE SUCCESS OR FAILURE OF THE INSTRUCTION, THE GOTO PART CAN 
1821000 BE SET OFF BY EITHER A "/" CWHICH MUST BE PRECEDED BY A BLANK) OR BY 

cot B22000 A "2%, MANY IMPLEMENTATIONS OF SNOBOL3 ONLY USE THE "/"» USUALLY 

1823000. BECAUSE. THEIR CHARACTER SETS DONT INCLUDE mits THE. B5500 WILL. 

~. ¥824000. ACCEPT ELTHER DELIMITER. ac 

4825000. 4 SIMPLE GO-TO PART CONSISTS OF A LABEL WITHIN PARENTHESES, 
1826000 FOR EXAMPLES 
1827000 

coh 828000 000 8 CLD. MEANS "GQ TO L". 
(1829000 = 38(X1) MEANS WEF THE RULE SUCCEEDED, GO TO XA". 


8 1830000. AX) MEANS "TF THE RULE FAILEDs GO TO Ax", 

es 1831000 SSC BY)FCAGAIN) MEANS "IF SUCCEEDEDs GO TO BY» OTHERWISE GO 
1832000 TG AGAIN", 
1833000 /FCEISCBACK) MEANS “IF FAILED» GO TO Es OTHERWISE GO TO BACK™, 


MEANS "IF SUCCEEDED» GO TO BLXGQ". 


1834000, 
18 _ MEANS. eo TO" AST Sy 


oy THE ASS0O0 A blows THe. USER TO OMIT THE "S" OR "F" ON THE SECOND PART 
1838000 WHEN ROTH SUCCESS AND FAILURE EXITS ARE USED. THUS 
1839000 
1840000 MEANS $SCAIFCB) 


MEANS. /FCLAISCL2) 


6B)... 


1843000 — THERE ARE pu We Gin tetions ON LABELS THAT CAN BE. USED IN A. “SIMPLE 
1844000 -TC * THESE VARY FROM ONE IMPLEMENTATION TO. ANOTHER? QN THE 


1845000 B5500 THEY ARE: 


CHARACTER MUST BE A LETTER OR A PIGITs 
NT CONTAIN: PARENTHESES, me 


185900 Ec, THE FOLLOWING LABELS» THOUGH yALIO LABEL ae CANT BE 
1851000 USED IN SIMPLE GO=TO PARTS: 


1857000 
nwt 838900. 


“ PBOT9Q00 2CP 20... ee 

1662000 7,3, RESERVED LABELS. 

1663000 

1864000 . THERE ARE THREE "RESERVED LABELS" THAT CAN BE USED IN SIMPLE 
HESE ARE NOT. REALLY LABE:S» BUT RATHER COMMANDS 
CERT TN. ACTIONS. THEY ARE? 


Ei ee TD Be ee 
1868000 END CAUSES” THE PROGRAM TO BE. TERMINATED NORMALLY. 
1869000 RETURN CAUSES A RETURN FROM THE LAST PROGRAMMER*@=DEFINED FUNCTION 
wt B7 9000 | WHICH WAS CALLED. THE RETURN IS SUCCESSFUL. 
- “"TB7 1000 ~ FRETURN CAUSES A RETURN ALSO» BUT THE FUNCTION FAILS, 
ae 1872000 


1873000 A PROGRAM CAN USE RETURN ANC FRETURN AS LABELS» BUT THEY CANT BE 
1874000 TRANSFERED TO BY A SIMPLE GOU@TOs A COMPUTED GO=TO MUST BE USED, 
1875000 IF THE PROGRAMMER DOESNT DEFINE THESE LABELS» THE COMPILER WILL 
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1876000 DEFINE THEM AS FOLLOWS: 


1877000 
1876000 RETURN tCRETURN) 


1879000 FRETURN  §(FRETURN) 
=f BB0000 2 ee eae ye 


1881000 

TBB2000 ae 

1883000 %CP 12 

1884000 7eds COMPUTED GO"TOS. 

1885000 

1886000 A PROGRAM CAN COMPUTE THE LABEL THAT AN INSTRUCTION IS TU TRANSFER 
1887000 TO BY USING A CONSTRUCT THAT LOOKS EXACTLY LIKE INDIRECTION INSTEAD | 


“1888000 OF A LABEL IN A GOTO PARTs THE VALUE OF THE EXPRESSION FOLLOWING 


1889000 THe "S$" TS THE LABEL TRANSFERED TC. FOR EXAMPLEs IF X = "1" AND 
1890000 Y = "AL"s THEN? 


4891000 . 
ee RYO a — MEANS /SCA1L) 
2693000.  IFCSYY MEANS $FCAL) 
(1694000 =. aS esex Your cscy Xd) MEANS $SCLALIF CALL) 
1895000 2c$C7M™ X 7," STZECY))) MEANS #0M1,2) 
1896000 
oO 0S. oo eccrmrmcumrarss 
4898000 


4899000 cp 15 
1900000 7,5, ERRORS IN GO*TC PARTS, 


1901000 
1902000 THERE ARE TWO FATAL ERRORS THAT CAN OCCUR IN A GO#TO PART, IF 
1963000 A PROGRAM ATTEMPTS TO TRANSFER TO A LABEL THAT ISnT DEFINED» THE 
1904009 PROGRAM TERMINATED AGNORMALLY WITH A MESSAGE GIVING JHE ERROR» 
THE STATEMENT NUMBER» AND THE ERRONEOUS LABEL. | 
OMPUTED GO-TO CONTAINS A FUNCTION CALL» AND THE ‘FUNCTION 


1907000 FAILS». THE, PROGRAM IS AGAIN TERMINATED ABNORMALLYs» AND A MESSAGE 


1908000 IS PRINTED SAYING THAT THE GQ=TO PART FAILED» GIVING THE STATEMENT 
1909000 NUMBER, 


“1910000 OF COURSEs te THE USER IS USING DEBUG MODE» THE PROGRAM WILL NOT 


1911000 BE TERMINATED « INSTEAD» THE ERROR MESSAGES WILL BE PRINTED ON THE 
1912000 LINE. PRINTER AND. TELETYPE AND THE PROGRAM WILL BE SUSPENDED. 
“1913000 

1914000 

gee 


es B aluees 


1919000 

1920000 AN EXTREMELY IMPORTANT CONCEPT IN SNOBOL IS THAT OF "FAILURE", 
1921000 A SnNOBOL INSTRUCTION CAN BE VIEWED AS A COMMAND TO ATTEWPT CERTAIN 
1922000 ACTLONSS IF THE INSTRUCTION CANT BE CARRIED OUT» IT IS TERMINATED. 


1923000 AT THE POINT WHERE IT HAS TO BE STOPPED, THE GO=TO PART OF AN INST= 


1924000 RUCTION PROVIDES THE PROGRAMMER WITH A WAY TO BRANCH ON THE SUCCESS 


1925000 OR FAILURE OF THE INSTRUCTION. MOST BRANCHING IN SNOBOL PROGRAMS 


1926000 IS DONE THIS wAys THE QTHER METHOD CCOMPUTING THE LABEL OF THE 
1927000 NEXT INSTRUCTION) 15 USUALLY RATHER RARE, 

1928000. IT. SHOULD BE. EMPHASIZED THAT FAILURE CAN OCCUR AT VIRTUALLY: ANY 
1929000 PART OF AN INSTRUCTIONs AND WHEN FAILURE OCCURSs THE INSTRUCTION 
1930000 TERMINATES IMMEDIATELY AND THE FAILURE EXIT CIF ONE EXISTS) IS TAKENs 


1931000 THERE ARE TWO RATHER VITAL POINTS NECESSARY TO SUCCESSFUL USE OF 


1932000 FAILURE? WHAT CAUSES FAILURE» AND WHAT WILL BE LEFT UNDONE WHEN 


® 
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1934000 
1935000 


_4936000_ 


1933000 AN INSTRUCTION FAILS AT A PARTICULAR POINT, 


1937000 ¥CP 18° 


1938000 8.1. CAUSES OF FAILURE. 
4939000 


1940000 THE FOLLOWING CONDITIONS CAUSE FAILURE OF AN INSTRUCTION: 


1941000 
1942000 


1943000. 
4944000 
1945000 


1946000 
1947000 


cepa eB O00... 
1949000 © 
+1950000— 


1951000 | 


1952000 
1953000 


1954000 
1955000 
Se POS0000 Coe 

ASST000 


1958000 
1959000 


1960000. 
oO  A9e1000 
1962000. 
1963000. 


1964000 
1965000 


. 4966000 
1967000. 
1968000 
1969000, 
1970000 


1971000 


1972000 | 
1973000 4 
4974000. 
1975000 
1976000 


1977000 
1978000 


4979000" 
1980000 


1981000 


1983000 


1984000. 


1985000 
1986000 
1987000 
19R8000 
1989000 


1982000 


1) FAILURE. OF THE PATTERN MATCH. . 

2) FUNCTION FAILURE. INTRINSIC FUNCTIONS FAIL WHEN THEIR DESCRIPTIONS 
SAY THEY SHOULD CASSUMING NO BUGS)$ PROGRAM=DEFINED FUNCTIONS 

- FATL WHEN THEY USE FRETURN IN A GO« TO PART, 

3) FATLURE OF ARITHMETIC. THERE ARE SEVERAL REASONS FOR THIS: 
NON"NUMERIC ARGUMENTS» VALUES TOO BIG FOR THE HARDWARE TO HANDLE: 

DIVISION BY ZERO* DIVISION WITH INTEGER MODE THAT GIVES A 
-NON@ZERO REMAINDER, ‘ 

4) [/0 FAILS WHEN THE OPERATION CANT BE COMPLETED. FOR FILES» THIS 
MEANS END@OF*FILE OR PARITY ERRORSe FOR TELETYPESs FAILURE IS 
CAUSED BY EXCEEDING THE WAIT TIME QR USING THE BREAK KEY DURING 
QUTPUT, GR FOR vARIOUS ABNORMAL CONDITIONS. 

3) A FIXED™LENGTH VARTABLE FATLS DURING EVALUATION IF ITS EENGTR 

ls NON® NUMER TC OR NEGATIVE. 

CP 25 

8, 12a, GRDER. OF EXECUTION. 

“IN BORDER ‘To KNOW HOW MUCH WILL BE DONE WHEN AN INSTRUCTION FAILS, 
Th IS NECESSARY TO KNOW THE EXACT ORDER IN WHICH AN INSTRUCTION Is 
EXECUTED.s THE RULES GOVERNING THE ORDER OF EXECUTION ARE? 

1) ALL EXPRESSIONS ARE EVALUATED FROM LEFT To RIGHT. FUNCTIONS ARE 

CALLED AS SOON AS ALL PARAMETERS HAVE BEEN EVALUATED. ARITHMETIC 

~  QPERATORS ARE APPLIED AS SOON AS BOTH OPERANDS HAVE BEEN EVALUATED, 

2) THE STRING REFERENCE Is THE FIRST PART OF A RULE -THAT IS > EVALUATED. 

3) AFTER THE STRING REFERENCE» THE PATTERN IS EVALUATED FROM LEFT TO 
RIGHTe NAMES OF STRING yARIABLES ARE EVALUATED WHEN THE STRING yAR@# 

_ TABLE IS ENCOUNTERED, 

4) AFTER THE PATTERN IS EVALUATED, THE PATTERN MATCH TAKES PLACE. 

5) AFTER THE PATTERN MATCHs STRING VARIABLES CIF ANY) ARE. ASSIGNED 

THEIR MATCHING SUBSTRINGS AS NEW VALUES. FAILURE. CAN OCCUR HERE 

IF A STRING VARIABLE NAME IS AN QUTPUT STRINGs AND THE OUTPUT 

OPERATION FAILS. 

6) THE REPLACEMENT PART CIF ONE EXISTS) IS THEN EVALUATED, 

7) THE REPLACEMENT OF THE MaTCHED SUBSTRING THEN OCCURS, 

8) LASTLY» THE APPROPRIATE PART OF THE GOwTO PART IS EVALUATED» AND THE 
PROGRAM TRANSFERS TO THE NEXT INSTRUCTION, FAILURE OF A GOTO PART 
IS A FATAL ERROR. 

SSECTION 9 

ZPAGE 1 

9, INTRINSIC FUNCTIONS, 

THIS SECTION DESCRIBES THE FUNCTIONS THAT ARE PRE@DEFINED BY THE 
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2036000. 


f 
t 
pe 
f 


| 
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| 


1990000 


1991000 
1992000 


1993000. 


1994000 
1995000 


1996000. 


1997000 
1998000 


1999000. 


2000000 
2001000 


2002000 
2003900 


2004000 


2005000 
2006000: 


2007000 
2008000 


ee 
(2013000 
2016000 


2018000 
2019000. 
2020000 | 

2nelooo 


2009000 
2010000 
2011000 


2015000 
2016000 
2017000 


2022000 
2023000 


ee 


2025000 


2026000 | 


2027000 


- 9028000 

2029000 | 

2030000. | 

- 2031000 

2032000 
2033000 


2034000 
2035000 


> poaTooo 
2038000 


2039000 
2040000 


cnn 2941000 0 
2042000 


2043000. 


2044000. 


2045000 
2046000 


B5500 SNOBUL3 SYSTEMe OF COURSE» THE NAMES OF THESE FUNCTIONS ARE IN 


NO SENSE "RESERVED"» ANO A PROGRAM CAN RE*DEFINE ANY OF THEM IF THE 
USER WISHES TO USE THEIR NAMES FOR HIS OWN FUNCTIONSe THE FUNCTIONS 
ARE LISTED IN ALPHABETICAL ORDERs 


RCP 8 oe 

ANCHOR(N) WHEN USED JN A PATTERNs CAUSES THE PATTERN TO "ANCHORED" 
AT CHARACTER Ne THAT IS, THE FIRST PATTERN ELEMENT MUST MATCH 
A SUBSTRING THAT STARTS AFTER AN INITIAL SUBSTRING OF N CHARACTERS, 
THE USUAL FORM? ANCHOR()» THEREFORE FORCES THE PATTERN TO MATCH AN 
INITIAL SUBSTRINGe N MUST BE A NON*NEGATIVE INTEGER, OR ANCHOR(N) 

WILL FAIL. NOTE THAT MOST IMPLEMENTATIONS OF SNOBOL3 pO NOT HaVE 

A PARAMETER FOR ANCHOR(C)3 IF A PROGRAM Is TO BE ySED ON OTHER 
SYSTEMS» THE PaRaMETER SHOULD NEVER gE USED. 


tcP 17 


ASSTGNTA SBD” Ig A SPECIAL FAST» “EFFICIENT” ASSIGNMENT FUNCTION THAT 
TAKES SPECIAL ADVANTAGE OF THE 65500 STRING REPRESENTATION. THIS 
FUNCTION CAN GENERALLY BE ASSUMED TO BE LACKING IN OTHER VERSIONS 
OF SNOBOL3,. IT IS EQUIVALENT TQ THE FOLLOWING TWO STATEMENTS? 


Ae po” 
ae 


NO CHECKING OF PARAMETERS IS DONE, INCLUDING CHECKING FOR QUTPUT USE. 


(CHECKS FOR INPUT USE OCCUR BEFORE THE FUNCTION IS CALLEOs SO THEY 
WILL NOT BE SUPPRESSED.) THE FUNCTION SIMPLY MOVES POINTERS AROUND 


IF EITHER PARAMETER IS A LITERAL» THE VALUE OF THAT LITERAL WILL BE 
DESTROYED CTHROUGHOUT THE PROGRAM)e=LITERALS SHOULD NEVER EVER EVER 
BE USED aS PaRAMETERS TO gSSIGN(C)- ,lSO» ~LTHOUGH 8B CAN BE OMITTED 
CIT WILL THEN BE ASSUMED NULL)» A MUST BE PRESENT» OR THE FUNCTION 
WILL FAIL eee : 


CALLFCFsP1sPasP 32000) CALLS THE FUNCTION NAMED BY Fe WITH PARAMETERS 


Pls pas P3s ETCe CALLF RETURNS THE VALUE RETURNED BY THIS FUNCTION» 
OR: FAILS. IF) THE FUNCTION FATLS+ F. CAN NAME. ANY FUNCTIONS INTRINSIC. 
OR | PROGR AM*DEFINED, FOR EXAMPLE? oe 
CALL FC" EX" s BaML SAL) MEANS FXC Be "12 AL) 
CALLFCtSIZE%,B) MEANS SIZECB) 
ee "MODEW," INTEGER") MEANS MODE ("INTEGER") 
IF CALLF 1s BEING TRACED» NO OUTPUT WILL APPEAR AT ITS RETURN, IT IS 
NECESSARY. TO TRACE THE FUNCTION BEING CALLED TO GET THE RETURN VALUE, 
IF THE FUNCTION IS UNDEFINED» AN ABNORMAL TERMINATION WILL OccUR AS 
WITH ALL STHER UNDEFINED FUNCTION CALLS. 
CR 24 | 
CLEARG) Se 
THIS FUNCTION “SETS ALL STRINGS TO NULL. THIS IS ONLY 
DONE TO THE TOP VALUE ON A PUSH™DOWN STACKs SO VALUES THAT 


WITHOUT LOOKING AT WHAT THEY POINT TOs NOTE THE FOLLOWING WARNINGS? 
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2047000 HAVE BEEN PUSHED DOWN WILL NOT BE LOST. AS AN EXAMPLE OF ITS USE» 


3048000 THE FOLLOWING FUNCTION CLEARS ALL STRINGS EXCEPT THOSE WHOSE NAMES 


2049000 ARF ON A CERTAIN LIST CWHICH IS THEN CALCULATED BY THE PROGRAM, 
ee ED ae COURSES 
2051000. .- a 
2052000 seer aeeetennedenk 
-. 2053000 “DEFINE  "RESETCLI» ttn" aru 
2054000 * L IS a LIST OF NAMES OF VARIABLESe THE NAMES ARE SEPARATED BY 
2055000 * SEMICOLONS C'3")» AND L SHOULD END WITH A SEMICOLONe ALL THE 
2056000 * VARIABLES LISTED IN L ARE PUSHED» EVERYTHING IS SET NULL» AND 
2057000 * THE vari LES ARE THEN POPPED TO wets FORMER VALUES + 


2059000 * NULL ; TAULPHAs RESULTS» AND MEM NOTE THAT THE STRINGS 
2060500 * RESETs cor “AND ND WILL ALSO BE SAVEDC, 

2061000 RESET PUSH(LeL) 
aphGO2RDO BESET A de oetll pce 1F (RESET2) 

bee ae) eee he : SeRESET IS 


2066000 RESET3 L *N# "3" = tF CRETURN) 
2067000 POP($N) (RESET 3) 


pe ee hee ee Ae ee 


2072000 Sep au 
2073000 CLOSECFsV¥) CLOSES THE FILE ASSOCIATED WITH THE I/O STRING $F» IN 
2974000 THE MANNER INDICATED BY Ve. CLOSE FAILS IF $F IS NOT A PILE 1/0 
2 yy “ONE OF THE VALUES: LISTED BELOW? 


2 Des LOSES. THE ULE. AND. SAVES THE I/O UNIT FOR THE PROGRAM, 
2078000 ‘DY 138K FILES CREATED BY THE PROGRAM ARE LUST$ OTHER DISK FILES 
2079000 REMAIN ON THE DISK» TAPES ARE REWOUND AND THE OPERATOR IS 

TOLD TO REMOVE AND SAVE THEM, 

ES AND LOCKS THE FILE. DISK FILES CREATED BY THE 

GRAM ARE ENTERED IN THE DISK DIRECTORY» AND ARE SAVED. 

ag oe ES ARE REWOUND AND LOCKED (THE UNIT. IS "NOT READY". UNTIL, 
2084000 THE OPERATOR READIES IT). 

2085000 “RELEASE” CLOSES THE FILE AND RELEASES THE UNIT AND ALL BUFFER 
2986000 AREAS TQ THE SYSTEM. TAPES ARE REWOUND AND MARKED AS SCRATCH, 
208 § CREATED BY THE PROGRAM ARE LOST, 

SES» PURGES» AND RELEASES THE FILE. DISK FILES” ARE 

20 Qole el FROM THE OIRECTORY IF THEIR SECURITY STATUS ALLOWS 
2090000 THE USER TO PURGE THEMse CIF HE CANTs THE mcP WILL KILL THE 


2091000 PROGRAM.) 
2092000 oo M4"_ 18 USED ONLY WITH TAPE FILES, FOR INPUT FILES* THE ENpD™OF"FILE 


(2093000. CURRENT FILE IS LOCATED» AND THE TAPE IS POSITIONED 
2094000 | OND IT. FOR GUTPUT FILES» aN END@OF"FILE IS WRITTENs | 
- 2095000. Ty "R CASE». THE TAPE. IS NOT REWOUND- AND REMAINS UNDER 
2096000 CONTROL OF THE PROGRAM, 
2097000 
2098000 


2099000 4cP 12 

2100000 COPY(S»w) RETURNS A STRING CONSISTING OF N COPIES OF S, FAILURE 
2101000 OCCURS IF N 4S NON*NUMERIC OR NEGATIVE. THIS FUNCTION IS QUITE 
2102000 USFFUL AS AN AID TO FORMATTING QuTPUTe FOR EXAMPLES 

2103000 


rr 
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2108000. 
2109000 | 
~ 2119000. 


On emir 


ee 
2135000 


2104000 


2105000 
2106000 


PRINT ¢ CUPYC™ "s"10"*SIZECA)) A  $FCTOOBIG) 
WILL PRINT A RIGHT =JUSTIFIED IN A 1OsCHARACTER FIELD, 


os C00 612.0) 0 cen tenn 


2111000 
2112000 


. 2113000 0 


2114000 


2117000 
2118000 


ow BALIIOD | 

2120000 
2121000 - 
2122000 


2123000 
2124000 


Prete 1010 ee or 
“2126000 

2127000 
2128000 0 


2129000 
2130000 


2434000 
> 2132000 
2133000 


2136000 
2137000 


2138000 
2139000 | 
2140000 
2141000 
2142000 


el 
2147000 


ZcP 3 ee es - 
DATEC) RETURNS THE CURRENT DATE IN THE FORM 


MMZDOZYY 


2415000. 
241600000 


2CP 25 
DELINE CAs B62, CREATES aA PROGRAM™DEFINED FUNCTION AT Nes 
TNE EAR AM TERS. DESCRIBE THE FUNCTION: AS” FOLLOWS? eee 


Be Is. THE “MFUNCTION. PROTOTYPE", “WHICH, GIVES THE “FUNCTION NAME 
AND ITS FORMAL PARAMETERS IN THE FORM? 


_SFCTNAME>(, <PARAMS> ) 


WHERE <FCT. NAME> Is THE FUNCTION NAME> AND <PARAMS> US — 
THE. LISt OF. FORMAT PARAMETERS CPOSSIBLY NULL) SEPARATED BY 
COMMAS. 
B CONTAINS a LABEL WHICH IS THE ENTRY POINT FOR THE FUNCTIONe 
AF BUTS Nubbe | THE ENTRY POINyY IS TAKEN 10 SPELLED THE SAME 
A '§ <FCT. ee : 
TAINS | A CIST OF LOCAL VARIABLES FOR THE FUNCTION, IF ANY, 


SEE THE DESCRIPTIONS OF FUNCTION CODE AND CALLS FOR FURTHER INFO 
ON PROGRAM@DEFINED FUNCTIONS+ SOME EXAMPLES OF CALLS OF DEFINEC)s 


Ae DEFINE C"MC ABs AC) "> OMEN» tt VeXYs2ALPH") 
DEF INEC"MAXCAB)"™) : 

“DEF INEC*MINCMINSX)") 

DEFINECTECTC) tp 5X") 

OR A ae LB", "MRGENTRY"» MLaeh2el3) 


i ae 
DETaCH(S»T) TURNS UFF aNY I/O USE OF THE OBJECT NAMED BY S Ca STRING 


2148000 

2149000 = NAME, FUNCTIONs OR LABEL). THE TYPE OF THE OBJECT Ig INDICATED 
 BiS0000 |. “BY THE PIRST. CHARACTER Qf T AS FOLLOWS: 

2151000 

2152000 ~——=s""§" MEANS THAT. S NAMES A STRING, 

2153000 "e™ MEANS THAT S NAMES A FUNCTION, 

2154000 "LE MEANS THAT S CONTAINS A LABEL, 

2155000 

“2156000 IF Tt I§ NULL» "S" IS ASSUMED» SINCE THE MOST COMMON USE OF THIS 
2157000 FUNCTION IS TO TURN OFF TRACING. FOR EXAMPLE» TO TERMINATE ANY. 
2158000 «1/0 USE OF THE STRING ALPHA» EITHER BETACHCTALPHAN) OR DETACH 


“2159000 


2160000 


"ALPHA","S") WOULD WORK, | 


nS, ine. $v 14 
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2161000 


2162000 
2163000 


2164000 _ 
2165000 
21686000 
-2167000 


2168000 
2169000 


2170000 
2171000. 

2172000 
2173000 


2174000 
2175000 


2176000 | 
(2177000. > 
2178000. 
2179000 


2180000 
2181000 


aCP 5 
DUMP() CAUSES A DUMP OF ALL STRINGS AND LABELS IN USE TO BE PRINTED 
ON THE LINE PRINTER FILE» PRINTe THE OUTPUT IS IN THE SAME 
FORM AS THAT USEO FOR TRACINGe FOR EACH STRING» ITS NAME AND 
CURRENT VALUE IS PRINTED, FOR EACH LABEL» THE NUMBER OF TIMES 
IT HAS BEEN EXECUTED IS GIVENe 


%CP 2 


EOFCS). SUCCEEDS IF $$ IS A FILE 170 STRING AND THE LAST I/7Q OPERATION 


ON THAT FILE FAILED DUE TO AN END*OF*FILE. 


*EQ(AsB) SUCCEEDS IF A AND B ARE BOTH NUMERIC AND REPRESENT. 


2182000... 


2184000 
2185000 


2186000 
2187000 


eee) a eee 
2190000 ae 
2191000 — 


2192000 
2193000 
2194000 


- 2495000. 

2196000. 
2197000 
2198000 | 


2199000 
2200000 


2201000 
2202000 | 
2203000 


2204000 
2205000 


2206000 | 
2207000. 
- 2208000 
8209000. © 


2210000 
2211000 


. 2212000 


2213000 
2214000 
2215000 
2216000 


2217000 


THE SAME INTEGERs 
cP 2 ee : 
EOUAr SOAs 8D -SyCCEEDS IF a AND B HAVE THE SAME STRINGS AS VALUES+ 


IT €AN BE DEFINEO IN SNOBOL AS: 
AB tPF CFRETURN) 
PRT | PAERETERNDACRETURN) 
%CP 15 
EXECUTECS) "EXECUTES" THE STRING Se AT PRESENTs THIS FUNCTION IS 


RATHER. LIMITED? AND WORKS FOR THE FOLLOWING CASES ONLY: 


4 s. Is. AN 1/0 STRING TO A FILE, THE FILE IS GIVEN TO THE MCP 
TQ EXECUTE.s THIS IS THE SAME AS THE "ZIP WITH <FILE PART>*" 
CONSTRUCT OF ALGOL. FOR DETAILS OF FILE ORGANIZATION AND 

_... USE OF CONTROL CARDS IN THE FILE» SEE THE ALGOL MANUAL, 

2) § STARTS WITH A "#", THE VALUE IS PASSED TO THE SNOBOL CONTROL 
EAR: ROUTINE» AND. INTERPRETED AS A CONTROL CARD. MOST OF 
THE CONTROL CARDS ARE RATHER USELESS DURING EXECUTION» BUT 

A FEW CLIKE "COMPILE ANp *LIBRARY) CAN AT TIMES BE USEFUL. 

3) S STARTS wITH "?". THE VALUE OF S IS PASSED TO THE MCP aS 

AN MCP CONTROL CARD, EXECUTEC) THEN RETURNS» AND THE MCP 

GIVES NO TNOICATION WHAT IT DID WITH THE CARD. THE. STRING 

PHOULD ALWAYS END WITH "SENDe"e 


ACP 42 
FILL CF sMFIDsFINsUNIT*DATE*SREEL*» CYCLE) ALTERS CERTAIN McP INFORMATION 
ASSOCIATED wITH THE I/0 STRING SFe THIS FUNCTION IS USUALLY 
A NO#NP IF THE FILE 1S OPEN CWHEN THE MCP WILL ALLOW CHANGES 
To An OPEN FILE IS VERY UNCLEAR). IF $F IS NOT AN I/O STRING TO 
A FILE» FILLC) WILL FAIL. IF ANY OF THE OTHER PARAMETERS IS NULL» 


re er ee a Se a i Se a i ie | 


412? 
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22464000. 
2265000 | Ee 
2266000 Cs 


2218000 


2219000 
2220000 
2221000 
2222000 
2223000 


2224000 


2225000 
2226000 
2227000 
2228000 
2229000 
2230000 
2231000 
2232000 


...2233000 

2234000 
2235000 | 
- 2236000 


2237000 
2238000 
2239000 


2243000 
2244000 


#243000 
2246000. 
224000 

22468000 


2249000 
2250000 
2251000 


2252000 
2253000 


2254000 


~~ 2255000 - 


2256000 


bri Oe PE WOO feeb ea 
2258000 20.28) 
“2259000° ae ee 
“ppedosa 
2261000 


2262000 


2267000 
2268000 
aan 


2271000 
2272000... 


2274000 


2263000 


THEN THE INFORMATION ASSOCIATED WITH THAT PARAMETER IS NOT ALTERED, 


SEouaORe Le: 
2241000 
2242000 - 


NON*NULL PARAMETERS WILL CAUSE THEIR ASSOCIATED QUANTITIES TO BE 
ASSIGNED THE VALUE OF THE PARAMETERse THE MEANINGS OF THE PARAMETERS 
ARE AS FOLLOWS: 
MFIN IS THE YMULTIS@FILE TeOe™ OF THE FILES THAT IS, IT IS THE FIRST 
HALF GF THE FILE NAME, FOR SINGLE*NAME CARD READER FILES» MFID 
TS "Q000000", IF SIZECMFID) > "7s ONLY THE FIRST SEVEN 
CHARACTERS WILL BE USED, . 
FIpn tS THE “FILE IeDe™ OF THE FILE""THE LAST HALF OF ITS NAME> 
UNIT IS AN INTEGER DESCRIBING TRE I/GQ DEVICE. THE VALID UNIT 
NUMBERS ARE GIVEN IN TABLE: Gele NOTE THaT FOR INPUT FILES» THE 
ONLY DISTINCTION THE PROGRAM NEED MAKE Is BETWEEN DISK FILES 
AND NON@piSkK FILcS. THUS» IF UNIT = “"O" AND THE FILE IS ON 
A MAGNETIC TAPE, THE PROGRAM wILL FINO IT CORRECTLY, FOR OUTPUT 
Poe FILES» HOWEVER» IT JS IMPORTANT TO GET THE RIGHT INTEGER, 
2 DATE. IS THE DATE ASSOCIATED WITH THE FILE CNORMALLY ONLY USED WITH 
. TAPES)». THO FORMS CAN BE USED: MM/DD/YY OR YyODD CWHICH Ts 
2 HOW IT) 1S STORED IN A FILE LABEL). 
REFL IS THE REEL NUMBER» FOR MULTI#REEL TAPES. 
CYCLE IS THE CYCLE NUMBER» USED WHEN SEVERAL TAPES HAVE THE SAME 
Als ANQ. he 
FOR: EXAMPLE» To ASSTGN THE I/O STRING CARD 1 THE O1SK FILE 
SMITH/CRD3»* THE PROGRAM WOULD USE? 
FILL C™CARD™ so "SMITH™s "CRD 3% "4 2") 
8 GIVE. THE FILE NEWDISK THE NAME Saeco ae you COULD USE? 
FILLCMNEWDISK"s GEO", “WCALIBR"™) 
NOTE THAT THE UNIT NEED NOT BE USED HERE? IT IS ONLY NEEDED wHEN A 
DIFFERENT [/Q DEVICE TS DESTREM THAN WAS USED THE LAST TIME THE FILE 
WAS OPENED. — FOR ANOTHER EXAMPLE, TO ASSIGN. THE FILE READ TO THE 
CARD READER. PILE INET: THE FOLLOWING WOULD WORK 
FILLCMREAD"» "OoDoOLOT. WINP T's "ot) 
SPAGE jie ae. 
TABLE 944s 
UNIT DESCRIPTION 
yee -CARD READER/PUNCH 
1. ee LINE PRINTER (NO BACK#UP) 
2 9 LABELED MAGNETIC TAPE 
3 UNUSED 
4 LINE PRINTER OR TAPE BACK*#UP 
35 _ LABELED "DESIGNATED" FILE (?) 
6) 6 Oe PRINTER BACKSUP TAPED >. 
pe UNLABELED "DESIGNATED. FILE (22. 
eee UNLABELED PAPER TAPE 
9 UNLABELED MAGNETIC TAPE 
10 RANDOM OISK FILE 
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2275000 


2276000 
2277000 


2278000 
2279000. 
— 22R0000°- 
2281000. | 


2282000 
2283000 


sins BEEN OOO ic aicrsintsuninsinnicn ade 
2285000. 


oop SUPERVISORY PRINTER (SPO) 


2286000 


2287000. 


2288000 
2289000 


2294000 


2295000 


a. 2296000. 
_- pepe7oo0 


2298000 Q 
 Reee00n 
2300000 
2301000 


2307000 


vone23 08000 


“3313000 
2313000 
_ 2314000 


e238 00. 
2318000 


2319000 


2322000 


2324000 
2325000 


_ 2326000 | 
“2327000 


2328000 
2329000 
2330000 
2331000 


12 SERIAL OISK FILE 
13 UPDATE DISK FILE 
14 DATA COMMUNICATIONS 
Sed B oO PRINTER BACKUP. DISK 
16 ~~ PRINTER BACKUP TAPE OR DISK 
ei PRINTER OR BACK#UP. DISK 
18 PRINTER OR BACK*UP DISK OR BACK#UP TAPE 
32 SPECIAL FORMS FILE. 
Kenge 2: ee a ; 
SEE CAS). “SUCCEEDS IF A AND B ARE BOTH NUMERIC AND A 2 Be 


(AB) SUCCEEDS IF A AND B ARE BOTH NUMERIC AND A > By 


eLECA2B) SUCCEEDS IF A ANO B ARE BOTH NUMERIC AND A S$ B, 


LEVEL() RETURNS THE LEVEL OF FUNCTION CaLLS WHICH THE PROGRAM 
HAS REACHED. THE LEVEL COUNTER STARTS AT 1» INCREASES WHEN 
A BONE oe AND DECREASES WHEN A FUNCTION RETURNS, 


aCP 7 


oy Se DEFINES THE STRING $8 To BE A “NQN*READING" INPUT STRING 


ASSOCIATED WITH THE I/O STRING $F. THIS MEANS THAT. 

S AS aN INPUT STRING WILL CAUSE THE "NEXT" RECORD TO BE. 

: UF OM THE FILE, BuT THIS RECORD wILL REMAIN IN THE BUFFER, 

SC IT WILL Be THE NEXT ONG READ, THUS» CONSECUTIVE USES OF $5 

WILL GIVE THE SAME INPUT RECORD. THE SYSTEM DEFINES THE I/Q STRING 
LOOK AS? LOOKC™LUOK"s"READ"), 


sLTCAsB) SUCCEEDS IF A AND B ARE BOTH NUMERIC AND A < Be 


o-B320000 0, 
"Sse i000 
Se cP Se. 

2323000 | 


MODE (VsP) SETS VARIOUS GLOBAL SYSTEM FLAGS» AS INDICATED BY Ve 

P IS USUALLY NOT USED» BUT FOR SOME VALUES OF V IT INDICATES A 
VALUE TO BE USED WITH THE FLAG. V MUST BE GONE OF THE VALUES 
BFELOWs OR MODEC) WILL FAIL. THE CURRENTLY RECOGNIZED VALUES 
OF vy ARE AS FOLLOWS: . 


MODEC"ANCHOR'sP) CAUSES ALL PATTERNS TO BE ANCHORED AT CHARACTER P,. 
THAT ISs ALL PATTERNS MUST MATCH WITH THE FIRST PATTERN ELEMENT 
MATCHING IMMEDIATELY AFTER THE PeTH CHARACTER. FOR P = "0" CUR 


@eee%eeee8ee8008008 86600080080 @ @ 
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a4 
3 
i 


2332000 
2333000 


2334000 


mo i= 11018) 2 eee 


2336000 


2337000 
2338000 _ 
2339000 


2340000 


2341000. 
2342000. 
2343000 — 
2344000. 8” 


2345000 
2346000 


8347000 
2348000... 
2349000 
2350000 | 


2351000 
2352000 
2353000 


 Besa000 
2365000 | | 
23568000 


2357000 
2358000 


2359000 | 
2360000 


— B361000 | 


3363000 


2364000 
2365000 


“2366000 
2367000. 


p368000. 
2369000 


2370000 


Scan et a OOD ©). 
2372000... 


pa73s000 
2374000 


2375000 
2376000 
2377000 


 g378000. 
2379000... 
- 2380000. 


2381000 
2382000 


meee net 
~~ 2384000 


2385000 


: panos 


2387000 
2388000 


P NULL» THE PATTERN MUST MATCH AN INITIAL SUBSTRINGe NOTE THAT 
MOST VERSIONS OF SNOBOL DONT ALLOW THE EXTRA PARAMETER Ps SQ 
PROGRAMS THAT ARE TO BE RUN ON OTHER SNOBOL SYSTEMS SHOULD 

ONLY USE MODE("ANCHOR"™), IF P IS NON*NUMERIC OR NEGATIVE? 
FAILURE OCCURS. . 


“MODE CTUNANCH"). OR MODE C™UNANCHOR™). RETURNS THE PATTERN WATCH MODE 


TO ITS NORMAL» UNANCHORED MODE, THAT ISe THE FIRST ELEMENT 
Op A PATTERN CAN MATCH STARTING ANYWHERE IN THE STRING REFERENCE, 
MODEC"DUMP™) CAUSES DUMP() TO BE CALLED WHEN THE PROGRAM TERMINATES. 


MODE CMERRDUMP"™) CAUSES DUMP¢) TO BE CALLED IF THE PROGRAM TERMINATES 


ABNORMALLY. 


MODE CMINFORM™) CAUSES WARNING DIAGNOSTIC MESSAGES TO BE PRINTED 


WHEN CERTAIN CONDITIONS OCCUR THAT ARE VALID IN SNOBOL BUT ARE 
OFTEN SIGNS OF PROGRAM ERRORS WHEN THEY OCCUR, SOME SUCH THINGS 
ARE? USING NON*NUMERIC ARGUMENTS TG ARITHMETIC OPERATORS OR 

_ ARITHMETIC FUNCTIONSS INDIRECTION WITH THE NULL STRING AS THE 

STRING NAMES. USING POPC) TO WIPE OUT THE PUSH*DOWN STACK FOR 

fA FUNCTIONS FORMAL PARAMETERS OR LOCAL VARIABLES# USING A 
~ FIXED= “LENGTH VARIABLE WITH NON*NUMERIC OR NEGATIVE LENGTH: 
ETC. THIS LIST MAY BE EXTENDED IN THE FUTURE» AS MORE SUCH 
CONDITIONS ARE BROUGHT TO THE ATTENTIONS OF THE SYSTEM AUTHORS 
WHICH CAN EASILY BE CHECKED BY THE SNOBOL INTERPRETER. 


“ MODEC"SILENCE™) TERMINATES MODEC"INFORM")« 
MODEC™DE RUG") TURNS ON: TRE CHECKING FOR DEBUG MODEs THIS 13 


THE INTERACTIVE DEBUGGING TOOL THAT IS PART OF THE INTERPRETERS 
TT IS DESCRIBED IN SECTYON 1142. 
MODEC™TRUN®) TERMINATES DEBUG MODE, AnD TURNS OFF THE ASSUCITATED 


LIMIT TESTS. 


— MODEC™ROUND™) SAYS THAT ALL OIVISION IS TO BE ROUNDED. THAT IS» 


‘If TRE REMAINDER Is 2472 OF. THE OIVISORs THE: QUOTIENT Ts 
INCREASED BY 1s 


MODE C" TRUNCATION") SAYS THAT DIVISION Is TO BE TRUNCATED==THE 


REMAINDER IS TO BE DISCARDED. 
MODEC™INTEGER™) SAYS THAT DIVISION IS TO FAIL IF THE REMAINDER 
TS NOT ZERO. 


MODE CMOVERFLOW™ PD WHERE $P 1S AOFIGLE -QUTPUT, STRING» SAYS THAT 


OTF A STRING. 1g WRITTEN THAT IS LONGER THAN A. RECORD» THE: 
EXTRA CHARACTERS ARE WRITTEN ON THE NEXT RECORD CTHIS WILL 
BE REPEATED IF THE REMAINING STRING IS STILL TOO LONG), 


MODE C™ TRUNCATE» P) CANCELS MQDEC"QVERFLOQW"sP)« THIS MEANS THAT 


STRINGS THAT ARE TOO LONG FOR ONE RECORD WILL BE TRUNCATED» | 
AND THE TaIL END WILL NOT BE OUTPUT. THIS IS THE aSSUMED MODE 
FOR ALL OuTPuT FILES UNLESS MODEC"OVERFLOW'SP) ITS USED. 


sNECAsB) SUCCEEDS IF A AND B ARE BOTH NUMERIC AND A # By 


cP 3 
a) SUCCEEDS LE A ITS NUMERICe THAT IS» THE FIRST CHARACTER 


MUST BE A. OLGIT. OR "#"3 ALL OTHER CHARACTERS MUST BE DIGITS, 
LTHE | Na STRING TS NUMERIC, AS IS "="3 BOTH = ZEROe 
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2389000 CP 4 
2390000 OPSYNCAsBsT) SETS THE OBJECT CSTRING» FUNCTION» LABEL) NAMED 


2391000 


2392000 


2393000 
2394000 
2395000 
2396009 
2397000 


2398000 | 
2399000 

2400000 _ 

~~ 2401000 - 


2402000 
2403000 


2404000 
2405000 | 
2406000 
2407000 


2408000 


2409000: 
2410000... 
2411000 


2412000 


~ 2613000 


2444000 
2415000 


2421000 


2422000 | 
2423000. 
2424000 _ 
2425000 | 


24276000 
2427000 
2428000 


2429000. 
2430000 
2431000 

2432000 


2433000 


aero 
24350 : 
2436000 
2437000 


2438000 
2439000 
2440000 


2441000 


2442000 
2443000 
2444000 
2445000 


BY A TO BE THE SAME AS THE ONE NAMED BY Be THE TYPE OF THE 
TWO OBYECTS IS GIVEN By THE FIRST CHARACTER OF Ts AS FOLLOWS: 


"sg" MEANS THAT A AND B ARE STRING NAMES. 
wee MEANS THAT.-A AND B ARE FUNCTION NAMES, 
"LE" MEANS THAT A AND B CONTAIN LABELS. 


IF T IS NULL» "F" IS ASSUMED*"IN ORDER TO BE COMPATIBLE WITH THE 
MANY SNOBOL SYSTEMS THAT ONLY ALLOW THIS FUNCTION TO BE APPLIED 


TO FUNCTION NAMES« SOME EXAMPLES OF THE USE OF OPSYNC() ARE? 


OPSYNC™XA™S"XS"s"STR") ASSIGNS THE VALUE OF XB TO XA» AND ALSO 
GIVES XA ANY I/O USE OF XBs 


OPSYNCTEL™s"RXAN SF") DEFINES THE FUNCTION FL TO BE THE SAME 


AS THE. FUNCTION RXA CINCLUDING TRACINGs IF RXA IS BEING 
TRACED) « IF RXA IS UNDEFINED» THEN FL 1S ALSO UNDEFINED, 


OPSYNCHREDO","O0"> "LABEL" ) DEFINES THE LABEL REDO TO BE THE SAME 


INSTRUGTION AS DO. ANY INSTRUCTION PREVIQUSLY LABELED REDO 
IS LOST UNLESS IT HAS BEEN GIVEN ANOTHER NAME, 


NOTE. THAT OPSYN ACTS AS AN ASSIGNMENTs NOT A PERMANENT DEFINITION» 
SO A FURTHER CHANGE IN ONE OF THE VARIABLES WILL NOT AFFECT 
THE OTHER. IF» AFTER THE FIRST EXAMPLE ABOVEs XB WERE ASSIGNED 


A NEW VALUE» XA WOULD REMAIN UNALTEREDS IF TRACELC"OO") WERE 
CALLEDs TRACING WOULD BE STARTED FOR DO BUT NOT FOR REDO. 


so OOR hy TRIVIAL EXAMPLE OF THE USE OF GPSYN Ist 
“7 BALTO00 
“2418000 
~. 2419000. 
2420000 


“OPSYN "NULL" EQUALS") 


ee WILL DEFINE A FUNCTION NULLC) WHICH WHEN CALLED WITH ONLY 


ONE ARGUMENT, WILL SUCCEED IF THE ARGUMENT IS NULL« THIS MAY 


BE DESIRABLE BECAUSE THE MEANING OF NULLCX) IS A BIT MORE OBVIOUS 


TERN: THAT OF EQUALSCX), 


SCP 16 

PAGECN»sF) CAUSES A PAGEsEVJECT 70 BE DONE ON THE FILE $F,» WHICH 
SHOULD BE A LINE PRINTER FILE. THE EJECTION LS TO “CHANNEL” N> 
“WHICH IS A POSITION SOMEWHERE ON THE PAGE DETERMINED BY A PAPER 
TAPE CONTROL WITHIN THE PRINTER» THE EVECT WILL OCCUR ON THE 


NEXT LINE OF OUTPUT» AFTER THE QUTPUT OCCURS. N MUST BE A VALUE 
BETWEEN "0" AND "lis "ot AND "1" ARE BOTH THE TOP OF THE NEXT 


_PAGEs IF F IS OMITTEDs THEN “PRINT” IS ASSUMED$ IF N IS NULL» 
THE TOP OF THE PAGE ("1") wILL BE ASSUMEDe THuSs TO SIMPLY DO 
Ae TRGETESECT ON THE PRINT FILE» THE FOLLOWING WOULD SUFFICE: 


PRINT ¢ PAGEC) 


ACTUALLY» PAGE) 1S A SPEC]ZAL CASE OF THE FUNCT]ON RECORD()» AND 


IS MEANT TO BE USED ONLY WITH LINE PRINTERS CTHUS THE RESTRICTION 
ON THE RANGE OF N)5 THE SAME EFFECT COULD BE ACHEIVED BY USING 
RECORD(FeN)» WITH 1 SN S$ L1e 


® a ¢. 


¢ 


YAT2T 
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2498000, 
_  Psgo000 
2500000. 


2446000 
2447000 
2448000 


2449000 | 


2450000 
2451000 


2452000 


2453000 
2454000 


_ 2455000 


2456000 
2457000 


2458000 — 


2459000 
2460000 


2461000 
2462000. 
2463000 


2464000 


2465000 


2466000 


2467900 | 

2468000 
2469000 | 
2470000. 


2471000 
2472000 


2473000. 
2474000 © 
» BATS5000 
2476000 , 


2477000 
2478000 
2479000 


2480000 © 
2481000 
2482000. 
~ 2483000 © 


2484000 
2485000 


2490000 
2491000 


2092000” 
(2493000 
2494000 | 

2495000 


2496000 


2497000 


zp 10. : 
RECORD(F»N) SETS THE “RECORD POINTER" FOR THE FILE ASSOCIATED. 


BCP 12 
POP(S) REMOVES THE TOP OF THE PUSH#DOWN STACK FOR THE STRING S, 
“EVERY STRING NAME IN SNOBOL CAN BE CONSIDERED A PUSH*DOWN 


STACK» WITH THE TOP OF TRE STACK THE CURRENT VALUE OF THE 
STRING. 8NE WARNING? IF THE FORMAL PARAMETERS OR LOCAL VAR@ 


TABLES OF A FUNCTION ARE POPPED WITHIN THE FUNCTION» THE RETURN 


FROM THE FUNCTION WILL TRY TO POP THEM AGAINS THIS CAN CAUSE 

SOME GRIEF IF CARE IS NOT TAKEN TO RESTORE THE STACKS TO THEIR 
CORRECT "DEPTH™ IN SUCH CASESe IN SUCH A SITUATIONs THE RETURN 
WOULD NOT ALTER THe STRING CIF THE INFORM FLAG IS ON» A MESSAGE 


WILL BE PRINTED *=SEE THE FUNCTION MODEC))-« POPCS) WILL FAIL. 
IF § IS NOT A STRING NAMEs OR IF S CANT BE POPPED BECAUSE THERE 


1S ONLY ONE VALUE IN ITS STACK, 


HOP 2 eee ‘ . 
PUSHCS sy) PUSHES: THE VALUE y ONTO THE PUSH=DOWN STACK FOR Se 


IF THIS 18 FOLLOWED BY POP(S)s S WILL RETURN TO ITS FORMER 
VALUEs PUSH(S,V) WILL FAIL IF S ISNT A NAMED STRING. ALSO, 


EACH CALL OF PUSH() REQUIRES ONE MORE ENTRY IN THE SYMBOL 


TABLES ‘THERE IS ROOM_IN THE TABLE FOR SOMEWHAT OVER 4000 
 SYMROLS CSTRINGS» LITERALS» FUNCTIONS» LABELS» TEMPORARY 
STORAGE FOR GROUPINGS» ETC.) AND EXHAUSTING THIS SPACE WILL 


CAUSE THE PROGRAM TO DIE ABNORMALLY. 


@cp 8. 
RANE OD PRODUCES A PSEUDO= “RANDOM NUMBER IN THE RANGES 


1 S$ »RANFCN) S$ N 


THE GENERATOR IS ALWAYS INITIALIZED TO THE SAME NUMBER» SO- 


THE VALUES RETURNED ARE “PREDICTABLE” IN THE SENSE THAT REPEATING 


oA RUN. WITH THE SAME VALUES FOR N WILL PRODUCE THE SAME SEQUENCE 
OF NUMBERS. 


2486000 - 
2487000 
— 2488000 
ie 


WITH $F TON. $F MUST BE A FILE I/O STRING? N MUST BE A 
NON"NEGATIVE NUMBER» OR RECORDCFsN) WILL FAIL« THIS FUNCTION 

Is REALLY ONLY USEFUL FOR DISK FILES. FOR LINE PRINTER FILES» 
“TT US THE SaME AS THE FUNCTION PaGEC)# FOR QTHER NON@pISK FILES 
-RECORDC) IS A NO*OP, FOR DISK FILES, ySING RECORD(F,N) SAYS 
THAT THE NEXT I70 OPERATION IS TC BE ON RECORD N, THE RECORDS 

OF A DISK FILE ARE NUMBERED STARTING AT O« IF N IS GREATER THAN 
THE NUMBER OF THE LAST RECORD IN THE FILE» THE NEXT I/0 OPERATION 


WILL FAIL DUE TO END"OF"FILEs — 


ssi000 ¥cP' 5 | 
2502000 RELEASE(A) wHERE A IS A TELETYPE TERMINAL ADDRESS» REMOVES THE 


@eeeeeeeee0ee0ee0ee080e e808 0@8 080 @® @ @8 @ 6 @ 


{AT2T 


Moore Business Forms, inc. sv 


9 ee eoee#e#e8e8fmUmMmUOUOOUCUCOOUCUOWUCUOOUCUOUUCUOUCUC® 


e® @ 6 


2503000 


2504000 
2505000 


2506000. 
2508000 - 
“2509000 


2510000 
2511000 


. 2912000 
~ 2543000... 
2514000 | 
82515000. - 


2516000 
23517000 


_.2518000.%. 
"3819000 RULE 
ee 2520000. = 5 

2521000... 


2522000 
2523000 


SecaReoNe 


‘ 2527000 
2529000 
2530000 


ees Po 
2534000 

2535000 

2336000 


Bee 35 San00." Paes 
2541000 
BE rca 


25470090 


__. 25480001 

"2549000 CHAR 

ee 
255 


mise 2552 00 0 Bie he 


2553000 


2334000 
“2555000 


2556000 
2557000 
2558000 
2559000 


- TELETYPE FROM THE LIST OF TELETYPES ATTACHED TO THE PROGRAM, 
FURTHER I/0 ON THIS TELETYPE BECOMES IMPOSSIBLE UNTIL THE PERSON 
AT THE TELETYPE RE“ATTACKES HIMSELF. RELEASECA) WILL FAIL IF A 
IS NOT A VALIO ADDRESS OR THE TELETYPE IS NOT ATTACHED, 


ACP 4 
REWINDCF) CAUSES THE FILE ASSOCIATED WITH $F TO BE REWOUNDs THE 


FILE REMAINS OPEN» AND 170 CAN CONTINUE AS USUALs STARTING 

FROM THE FIRST RECORD OF THE FILEe FOR OISK FILES* REWINDCF) 
TS EQUIVALENT TO RECORD("O"sF),. ee 
ZCP_7 


RETURNS THE NUMBER OF RULES EXECUTED AT LEVEL N C2. 1) 
SINCE THE LAST TIME LEVEL N WAS REACHED, IF N = "0" COR NyLL) 
THE TOTAL FOR THE ENTIRE PROGRAM IS RETURNED, IF N S$ LEVEL()> 
THE CURRENT INSTRUCTION IS INCLUDED IN THE TOTALe NOTE THAT IF 
RULES(N) = "o's THEN LEVEL N HAS NEVER BEEN REACHED» IF N IS 
-NON*NUMERIC OR NEGATIVEs RULESC(N) WILL FAIL. 


cP 30 

SEARCHC(FILE) WHERE SFILE IS AN I/O STRING TO A DISK FILE» DOES A 

SEARCH OF THe DISK DIRECTORY FOR THE FILE. IF IT IS PRESENT» 
0 RIPTION OF THE FILE 1S RETURNEDe FAILURE OCCURS IF $FILE 

OT A DISK FILE, OR IF THE FILE IS NOT IN THE. DIRECTORY. 

al JE FILE IS IN THE DIRECTORY» THE RETURN VALUE IS OF THE 
FOLLOWING FURM! 


<MFID> / <FID> t <SECURITY> $ <REC SIZE> + <BLCK SIZE> + 
F PNTR> + <UPEN COUNT? oo 


‘HE NAL NAME Or THE FILE IS vig 103746 10>; THE SECURITY 
STATUS, <SECURITY>, IS A STRING OF 3 "O"=S OR "L%"S WITH THE 
FOLLOWING MEANING? 


eo LP THE USER CAN ALTER THE SECURITY STATUS. OR. 
AMEs OR CAN. REMOVE THE FILE. 

; “in IF THE USER CAN. READ FROM THE FILEs. 

"1" Tre THe USER CAN WRITE ON THE FILE. 


ie roe eae OF PROGRAMS DOING I/O ON “THE FILE. ‘NOTE THATS | 
UNLIKE ALGoL WHICH DEALS ENTIRELY WITH WORDS» THE RECORD SIZE 

AND BLOCK SIZE ARE GIVEN TO A SNOBOL PROGRAM IN CHARACTERS. 
IF <SECURITY> = "O00"s THEN <REC SIZE>» <BLCK SIZE># ETC. 
WILL ALL BE "O". 
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2560000 
2561000 


25462000. 


2563000 


2864000 


2565000 
“2566000 


2567000 


2568000 


| ao ee. 


2570000 


2571000 
2572000. 


2573000 
2574000 


oon 215000 
Bareo0o, 
2577000 | 
2878000 


2579000 
2580000 


2582000 
2583000. 
2584000 .. 


2585000 
2586000 


SIZECS) RETURNS THE NUMBER OF CHARACTERS In Se THUS» SIZEC"™ABC™) = "3", 


“CP 13 es 
SPACE CF oN) SETS. A COUNTER FOR THE FILE ASSOCIATED. WITH $F TO Ne SO 


THAT EACH I/n GPERATION ON THE FILE IS PRECEDED BY SKIPPING N 
RECORDS CON INPUT) GR WRITING N BLANK RECORDS (ON OUTPUT). FOR 
LINE PRINTER FILESs N = "1" TS NORMAL» N = "O" CAUSES OVERPRINTINGs 
N = "2" CAUSES DQUBLE SPACING» ETC. FOR OTHER FILES» A SKIP TO 
THE NEXT RECORD IS.PART OF THE I/O OPERATION» AND N = "0" IS THE 
(NORMAL SETTING. SPACECFsN) WILL FAIL IF SF IS NOT AN I/Q STRING 
FOR q FILEs OR If N IS NON*NUMERIC. FOR EXAMPLES 


oS RAGE COPRINT p02") 


WILL CAUSE “DOUBLE=SPACING ON THE LINE PRINTER FILE. PRINT UNTIL 
“ANOTHER CALL OF SPACEC) CHANGES THE SPACING, 


GCP 6 ee : a oe or es Ce eee 
SUSPEND(N) HAS” TWO USES* IF N. 1S NON“NyLt» IT MyST BE AN INTEGER; 


2987000 


‘THE PROGRAM WILL BE SUSPENDED FOR N SECONDS AND THEN WILL RESUME 


EXECUTION FROM THE FUNCTION CALL, WHICH WILL RETURN A NULL STRING. 
IF N §$ QO» THE CALL IS A NO#OPe IF N IS NULL COR MISSING)» THE 


PROGRAM. Is SUSPENDED AND THE INTERACTIVE DEBUGGING Ne Is 


ee SECTION 11,2 FOR DETAILS. 


oC ee 


2592000 
2593000 


2598000 
2599000 


2600000. | 


2601000 


ebeoe 
2603000 


2604000 
2605000 


2607000 


2609000 
2610000 


wed A080 nes 
2612000... 


2613000 


gee 
2615000 


2616000 
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2594000 
2595000 
2596000 ~~ 

2597000 


THAT: ALL ATTACHED TELETYPES ARE TO BE CONSIDERED, 
EITHER. mow OR "its DEPENDING ON THE TYPE OF STATUS STRING DESIRED. 


STATUSCAsT) GIVES THE STATUS OF ATTACHED TELETYPES. A IS EITHER 


THE ADDRESS OF AN ATTACHED TELETYPE, OR IS NULL» WHICH MEANS 
-T-1S A NUMBER» 


THE MEANINGS OF THE TWO VALUES OF I ARE? 
I = "0" IS A "PASSIVE" STATUSe THAT IS» THE STATUS AS OF THE LAST 


HARDWARE INTERRUPT ASSOCIATED WITH THE TELETYPE IS RETURNED. 


PTs OCCUR FOR. 1/0 OPERATIONS AND FOR STATUS INTERROGATES, 
(e OMLM TS AN MACT IVE” STATUS»s. THIS MeANS THAT A HARDWARE STATUS 
INTERROGATE 1S PERFORMED, THE MCP STATUS WORD IS UPDATED, AND 
THE NEW VALUE IS THE VALUE RETURNED. UNFORTUNATELYs THE MCP 
_ALSQ_ INTERPRETS An ACTIVE INTERROGATE AS A COMMAND TO START 
“ CHARGING THE PROJECT NUMBER OF THE PERSON AT THAT TELETYPE. 
FoR THE JgB TIME. For SINGLE*USER JqgBS» THIS HAS Ng EFFECTs 
BUT FOR MULTI“USER JOBS IT CAN BE RATHER ANNOYING, 


THE FORM OF A STATUS STRING FOR A SINGLE TERMINAL IS3 


_<STATUS> = S SPROJF> / <USER#> t <ADDR> $ <CONOITIONS> ) 


ee <PROJ#>/<USERH> IS THE USERS PROJECT AND IeDs NUMBER, 
(THIS IS THE SECURITY SYSTEM IN USE AT THE UNIVERSITY OF WISCONSINS 


USERS AT OTHER INSTALLATIONS WILL PROBABLY HAVE TO ALTER THIS 


e © 
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2617000 
2618000 
2619000 


2620000 © 
2621000. 


2622000 
2623000 
2624000 
2625000 


2626000 | 
2627000 
2626000 


ee ee ee 
MCRE CONDITIGNS mMAy BE ADDED IN THE FUTUREs AS THEY ARE MADE 


2639000 
2631000 


2632000... 
2635000. 


2636000 
2637000 


_ .2#638000 
2639000 

— 2640000 . 

— 2641000 


2642000 
2643000 


2644000. 
2645000. 

2646000 
2647000. 


2648000 
2649000 
2650000 


2651000 
2652000 - 
2653000 


2654000 
2655000 


2656000 
2657000. | 
26568000 
2659000 | 


2660000 
2661000 


2662000 | 
2663000 
2664000 
2665000... 


2666000 
2667000 
2668000 
2669000 
2670000 
2671000 
2672000 


INTRINSIC TO HANOLE THEIR LOCAL ACCOUNTING PROCEDURES, ) 


<ADOR> IS THE ADDRESS OF THE TELETYPE» AND <CONDITIONS> IS 
A STRING OF "O""S AND "1""S WITH THE FOLLOWING MEANINGS? 


SOYST STE TF UNIT IS READY : : 
OND = "A" TF UNTT IS READ*READY (CIeEss THERE IS INPUT TO READ). 
3RD = "4" IF UNIT IS WRITE*READY (OUTPUT IS POSSIBLE) 
ATH = "4" IF WRITE IS IN PROGRESS. 
5TH = "1" IF BREAK KEY USED ON LAST OUTPUT. 
67H = "1" IF HARDWARE DETECTS ABNORMAL CONDITION« 
7TH = -"1" TF UNIT TS BUSY. 
BTH = "1" IF SOME PROGRAM HAS EXCLUSIVE USE OF UNIT. 


AVAILABLE BY THE HARDWARE AND BY THE MCP, 


WHEN A IS. NULL» THE STATUS STRINGS OF ALL ATTACHED TELETYPES 
is RETURNED IN THE FORM? 


<STATUS>. “@STATUS> <STATUS> eee SSTATUS> 


WITH ONE <STATUS> FOR EACH TELETYPE. IF THERE ARE NO TELETYPES 
ATTACHED» OR IF A IS NON*NULL AND NOT THE ADDRESS OF AN ATTACHED 
TELETYPE, STATUSC) WILL FAILe FAILURE ALSO OCCURS IF I ISNT 


NUMERICALLY *o" OR "1" (NULL OR MISSING IS "0"), 


ACP 20. 
TAME OND RETURNS” VarIOUSs TIMES ASSOCIATED WITH THE PROGRAMs AS FOLLOWS: 


“Tiwectons. aR TIMEQ) RETURNS. TRE TIME OF DAY. IN THE FORM? 
HHEMMISS 


TIME C!4") RETURNS THE ELAPSED TIME SINCE MIDNIGHT IN SIXTIETHS 
. OF Ae SECOND, 


THERE): RETURNS THE PROGRAMS TOTAL CPU TIME» IN SIXTIETHS OF 


A SECOND, 


gi AM 3) RETURNS THE PROGRAMS TOTAL 1/0 CHANNEL TIME, AG AT IN 


SIXTIETHS ‘OF A SECOND. 


Te Casy RETURNS THE VALUE OF A SIx=BIT TIMER IN THE FORM OF 


A SINGLE CHARACTER, THE TIMER USED CHANGES EVERY SJXTIETH OF 
A SECONDs WHEN CALLED AT WIDELY SPACED INTERVALS (THAT IS, 
WITH SEVERAL HUNDRED SNOBOL INSTRUCTIONS IN BETWEEN)»s IT 
BEHAVES WUCH LIKE A RANDOM. CHARACTER, hee 


*CP 2 
TRACEF CR Ll sF2eF3,ee0e) TURNS GN TRACING FOR THE FUNCTIONS NAMED BY 


Fis Fas F3s ETC. SEE SECTION 11.1 FOR DETAILS. 


2673000 &4CP 2 
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2674000 


2675000 
2676000 
2677000 
2678000 
2679000 
2680000 
2681000 
2682000 
2683000. 
2684000 
2685000 
2686000 


~ 26B7000 


2688009 
2689000 


2690000" 
2691000 
2692000 


2693000 
2694000 


2695000 
2696000 
2697000 
2698000 | 


2699000 
2700000 


2701000 


2702000 
2703000 
2704000. 


“2705000 


2706000 
2707000. 


2708000. 


2709000 
2710000 


~ 2711000 


2712000 


_ 2713000, 
2744000 — 
2745000 
2716000. 
2717000 


2718000 


2723000 
2724000 
2725000 


7 2726000 |. 
2727000 


2728000 


~ 2729000 


2739000 


TRACELCLIsL eel 3reee) TURNS ON TRACING FOR THE LABELS CONTAINED IN Lis 
Lé@se |.3» ETC. SEE SECTION 11.61 FOR DETAILS. 


xCP 2 : 
“TRACES(S1» $2*S32eee) TURNS ON TRACING FOR THE STRINGS NAMED BY 
St» S2s S3*s ETC. SEE SECTION 11.1 FOR DETAILS, 


BCP 6 
TRIMCS). RETURNS THE VALUE.OF S WITH ALL TRAILING BLANKS CIF ANY) 
REMOVED, SOME EXAMPLES ARE? 


TRIMC’ ABC. >). = ™ AB CN 
OTRIMOD 5 om a ote 
TRING! XYZ") e ogyan 


ZCP 3 
UNEQL (As ,B) SUCCEEDS IF. A AND B HAVE DIFFERENT STRINGS AS VALUES» 
THE USER SHOULD COMPARE UNEQLC) WITH THE FUNCTIONS: EQUALS) AND 


“w@NEE) 6 


eCP 7? 
MSERCA) HAS TWO USESe IF A IS NULL» THE VALUE IS THE AQDRESS OF. 
THE. TELETYPE BEING USED FOR I/O WITH THE STRING TELETYPE. IF 
A IS NONWeNULL» IT MUST BE THE ADDRESS OF AN ATTACHED TELETYPE. 
THIS TELETYPE BECOMES THE ONE BEING USED FOR I/Qs AND ITS ADORESS 
TS ALSO THE VALUE RETURNED. NOTE THAT IN THE LATTER CASE» USERCA) 
IS NOT NEGESSARILY THE SAME AS A» SINCE THE ADDRESS 1S PUT INTO 
A STANDARD UGRAT, FOR EXAMPLE» MSERC™OLZ03%) = "1/3", 


ecP 6 

WAITCN) SETS THE WAITING TIME FOR TELETYPE 1/70 TO N SECONDS» IF N 
oeoTs NON*NULL AND NUMERIC, IF N IS NON*@NUMERICs WAITCN) FAILS, 
ook NULLS THE: WAITING TIME IS NOT ALTERED. IN EITHER CASE» 


"WAS CALLEDe THIS FUNCTION IS EQUIVALENT To THE “WAIT CONTROL 
CARD} IF NEITHER IS USED» 300 SECONDS €5 MINUTES) IS ASSUMEDe 


2719000 
2720000. 
(2721000 


- 8722000 ZSEcTION 10.0. 


4PAGE 1 
10. INPUT/QUTPUT. 


1/0 0N THE 85500 1S. NORMALLY ASSOCIATED WITH A FILE WHICH IS AN 
ORDERED SET OF I/O "RECURDS". A FILE IS IDENTIFIED BY ITS NAME» 
WHICH IS Of THE FORM <MULTI@FILE IeDe>/<FILE Iepe>* WHERE BOTH 
<MULTIMFILE ITeDe> AND <FILE TeDe> ARE STRINGS OF FROM 1 TO 7 
CHARACTERS. NORMALLY» ONLY ALGOL*LIKE IDENTIFIERS aRE USED IN FILE 


THE RETURN VALUE IS THE WAITING TIME AS IT WAS BEFORE THE FUNCTION 
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= 
pow es AF BL000 NAMES, SINCE MANY MCP FILE*HANOLING COMMANDS CAN ONLY HANDLE SUCH 
2732000 NAMES, A SPECIAL CASF IS MADE FOR CARD*READER FILES» WHICH MAY 
6 | 2733000 HAVE ONLY A <FILE TeDe>™*THE <MULTI@FILE I.De> IS THEN ASSUMED 
ereane . 2734000 TO BE "9000000", 
2735000. ~=—s TELETYPES ARE HANDLED DIFFERENTLY THAN NONTINTERACTIVE I/a. DEVICES, 
€ (2736000 THERE IS NO "FILE" ASSOCIATED WITH A TELETYPE CAS FAR AS SNOBOL 
iene 2737000 USERS ARE CONCERNED). TELETYPE I/0 IS DISCUSSED IN SECTION 1004, 
2738000 
€ 2739000 
i calle ao em? 40000 7 
2741000 CP 24 ae 
€ 2742000 10.1, 1/0 STRINGS. 
ee BA OO Go ees nee ke . 
2744000 oO Do I/d* SNOBOL USES “I/g STRINGS” THESE ARE STRING NAMES 
@ 2745000 THAT ARE ASSOCIATED WITH I/O OPERATIONS IN ONE OF TWO WAYS: IF 


recs epee cinema tee enna nee te er errnarpueminn 2 gh an ey 


27 46000. 


2750000 
2751000 
oT 52000. 


"2756000 


2757000 


A STRING. 


AS "INPUT USE"s THEN ATTEMPTING TO USE ITS VALUE WILL 

OF A RECORD FROM ITs ASSOCIATED FILES IF THE 
: PUT USE"» THEN ASSIGNING A VALUE TO THE STRING WILL 
‘STRING TO BE QUTPUT To ITS ASSOCIATED FILE» FOR EXAMPLE» 


THE STRING NAMED “PRINT” IS AN OUTPUT STRING TO THE LINE PRINTER}. 


THE INSTRUCTION: 
teen ay QUOTE A QUOTE 


POL e T THE. VALUE OF Ay IOENTIFIED As SUCHs TO THE PRINTER, 
BEF ARE AN I/O STRING CAN BE USED, LT Ig NECESSARY TG ASSIGN IT 
TO A FILE. THERE ARE TWO WAYS TO DO THIS IN SNOBOL. THE WAY THAT 
MEN EO IS TOG USE ae INTRINSIC FUNCTION FILLG)» WHICH 
SE OQ! AN ASSIGNMENT CAN BE MADE BY USING THE _ 
ROL CARD, THOUGH THIS IS RATHER RESTRICTED. SEE 


 -9762000_ ei amc ie A i A 


2768000 


2763000 


27469000 


ee 


ee 
2775000 
2776000 
2777000 


2778000 
2779000 | 


2730000 


2781000 


2782009 


BFRSOGO CEE” 


2784000 
2785000 
2786000 
2787000 


N AND cLOseo FILES. 


y FILE TS “EITHER "OPEN" ‘OR "CLOSED" WITH RESPECT TO A GIVEN 
PROGRAM. A FILE IS OPEN IF THE PROGRAM HAS DONE SomME I/o ON IT 
AND HAS NOT CLOSED IT. IN SNOBULs THERE ARE TWO WAYS TO CLOSE 


“NOT FILE. ASSOCIATED WITH A GIVEN 1/0 STRING HAS BEEN CLUSED> 
FHE PROGRAM CAN USE THE FILLC) INTRINSIC TO RE@*ASSIGN THE I/0 STRING 
TO a DIFFERENT FILE. THE NEW FILE CAN THEN BE OPENED BY DOING I/O 
ON IT» A PROGRAM CAN CLOSE A FILE» RE*ASSIGN ITS I/O STRING» AND 

Le AS OFTEN AS DESIRED, FOR EXAMPLE» IF A PROGRAM 

| J “THE 1/79 STRING CARD, WHICH IS ASSIGNED To, SAy, THE 
FILE. ee THIS FILE CAN BE DROPPED AND I/O RE= INITIATED ON THE. 
DISK FILE c/D BY THE FOLLOWING CODE! 


ELOSEC™CARD")- 
FILLCP CARD» "Ct,"OM, yO") 
C = CARD 


THIS WILL ASSIGN C THE FIRST RECORD IN THE FILE C/D. 
SOME I70 STRINGS CAND THEIR ASSOCIATED FILES) ARE OPEN AT THE 


ING THE INTRINSIC FUNCTION CLOSEC), AND BY TERMINATING 


rn ee ee ee ee ee ee ee ee ee ee ee a er er. 
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2788000. 


2789000 
2790000 


2792000. 
2793000 


_ 2794000: 


2795000 
2796000 
2797000 
2798000 
2799000 


2800000 


2801000 
2802000 


goo 2008 aes 
2804000 


2805000. 
2806000. 
~ 2807000 
2808000 
2809000 


~Baidooo 
2811000 _ 
- 2812000. 


2813000 
2814000 
2815000. 


2816000 
(2817000 


See 


2820000 


2821000 


2822000 
2823000 


2824000 


~ 2825000 
2826000 
2827000 


— 28290 


9830000 


START OF A sNOBOL JOB, WHILE OTHERS ARE CLOSED. SEE THE NEXT SECTION 
THE SUCH INFORMATION ON PARTICULAR JI/0 STRINGS 


Sai COLO OD oc acascins 


xCP 0 7 
10.3. STANDARD I/0 STRINGS. 


THERE ARE A NUMBER OF STANDARD 1/0 STRINGS PROVIDED BY THE 
B5500 SNOBOL SYSTEM» WHICH CAN BE ASSIGNED TO FILES OF THE APPROPRIATE 
TYPES, UNFORTUNATELY» THE p5500 OPERATING SYSTEM MakES IT IMPOSSIBLE | 
TO PROVIOE THE USER WITH A WAY TO DEFINE HIS OWN FILE TYPES CHOPEFULLY 


THIS MAY BE REMEDIED SOMETIME IN THE FUTURE)$ THE 1/0 STRINGS THAT 


ARE PROVIDED BY SNOSOL SHOULD BE SUFFICIENT FOR THE NEEDS OF MOST 
USERS. 
ie LOL ONING. a ee ARE Bias BY B5500 SNOBOL35 


SCP. 5 - 3 

“READ 18. ‘neur: FROM A CARD- IMAGE Feu IS» ANY FILE CCARD, 
TAPE» O1SKe ETCe) WITH 80"cHaR LOGIcalL RECORDS aND 240"CHAR 
PHYSICAL RECORDS. CARD*READER FILES ACTUALLY DO NOT HAVE 
240"CHAR PHYSICAL RECORDS» BUT THe SOFTWARE MAKES IT LOOK LIKE 
THEY DO. FOR BATCH yOBS, READ IS OPEN AT THE START. OF EXECUTION, 
“AND TS ASSIGNED TO THE FILE THAT CONTAINS THE PROGRAM, THE FIRST 
RECORD READ wiLL BE THE ONE FOLLOWING THE END CARD. FOR REMOTE 
JOBS» READ IS CLUSEN AT THE START OF EXECUTION. 


aCP 13 


LOOK (IS q TNON*READING" INPUT STRING FOR THE SaME FILE THAT THE 


STRING READ IS ASSIGNED TO. THAT IS» REPEATED USES QF LOOK 
WELL GIVE THE SAME RECORD OF THE FILES USING READ WILL THEN GIVE 
THIS SAME RECORD» AND ADVANCE TQ THE NExT ONEe THUS: ; 


* LOOK 

~ LOOK. 
READ 
READ. 


OO DF 
waa 


WILL ASSIGN THE SAME RECORD TO A» By» AND C# D WILL GET THE NEXT ONES 
THE FUNCTION LOOKC) CAN BE USED TO DEFINE STRINGS OF THIS TYPE 

FOR OTHER INPUT FILES. THE. STRING LOOK CAN IN FACT BE DEFINED 

BY. GOOK COL DOK” » PREADE) » 


2834000 


2832000 
ie 
2834000. 
2835000 


2836000 


2837000 
2838000 


con snein@B39000 
2840000. 
2841000 


2842000 


“2843000. 


2844000 


2CP 5 

CARD Ts BOTH INPUT AND OUTPUT FOR A CARD@IMAGE FILE WITH 8Q*CHAR 
LOGICAL RECORD aND 240"cHaR PHYSIcal RECORD. OF COURSE» IF IT IS 
“ASSIGNED TO A CARD*@READER FILE» OUTPUT Is IMPOSSIBLE CAND WILL 
CAUSE TERMINATION BY THE MCP). CARD IS CLOSED AT THe START UF 
EXECUTION® 


%CP 28 at . - 

NEWOTSK IS AN 1/0 STRING FoR A DISK FILE THAT WILL BE CREATED ~ 
WHEN THE FILE IS OPENED. THIS FILE CAN BE VIEWED AS A TEMPORARY 
“pISk FILE» WHICH WILL BE SAVED CPUT IN THE DISK OIRECTORY) 
WHEN CLOSEC"NEWDISK") OR CLOSEC"NEWDISK"»"LOCK") IS CALLED» 

OR WHEN THE PROGRAM TERMINATESe IF ANY OTHER SECOND PARAMETER 
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2845000 


2846000 
2847000 
2848000 


2849000. 
“2850000 


2851000 
2852000 
2853000 


2854000 


2855000 


2856000 
2857000 - 


2858000 
2859000 


nw 2860000_ 
2861000. 
2862000 
2863000 


2864000 
2865000 


.. 2866000 | 
2868000 
2869000 


2870000 
2871000 


2872000. 
2873000 


2874000. 


2875000. 
2876000 


2877000 


2882000 
2883000 


2888000 
2889000 
2890000 


2891000 


2892000 
2893000. 
2894000 
2895000 


2896000. 


2897000 
2898000 


2899000 
2900000 


2901000 


1S USED+ THE FILE WILL BE CLOSED AND DYJSCARDED, THE FILE asSoc- 
TATED WITH NEWDISK HAS BO0-CHAR LOGICAL RECORDS AND 240=CHAR 
PHYSICAL RECORDS+ WHEN NEWDISK IS CLOSED» IT CAN THEN. BE 
GIVEN A NEW NAME» IF DESIREDs AND RE*OPENEDs AND ANOTHER 
DISK FILE WILL BE CREATED. IF THERE IS ALREADY A FILE IN THE 
DIRECTORY WITH THE NAME ASSIGNED TO NEWDISKs THEN ATTEMPTING 
“TO FNTER IT IN THE DIRECTORY WILL CAUSE THE PROGRAM TO SE SUSPENDED 
UNTIL THE OPERATOR TAKES aCTION@“USUALLY THIS ACTION CONSISTS OF 
KILLING THE PROGRAM+ THE MAXIMUM NUMBER OF RECORDS THAT CAN 
BE PUT IN A FILE ASSOCIATED WITH NEWDISK IS 12000. THE END*=OF= 
“FILE IS ALWAYS JUST AFTER THE LAST RECORD THAT HAS BEEN WRITTEN 
ON THE FILE. THE SAVE FACTOR GIVEN TO FILES CREATED BY 
--NEWOISK 18 15 OAYS, 


Oe 0 fo a. es sak 

PRINT. TS AN QUTPUT FILE TO THE LINE PRINTERe IT IS OPEN aT THE 
START OF. EXECUTIONS SINCE THIS FILE IS USED BY THE COMPILER 

To PRODUCE. THE LISTING AND’ THE OTHER OUTPUT THAT THE COMPILER 
GENERATESe ON MOST B5500 SYSTEMS» THE LINE PRINTER HAS 132 
CHARACTERS PER LINES QUTPUT GF A STRING LONGER THAN THIS WILL 

CAUSE TRUNCATION UNLESS MODEC"OVERFLOW's*PRINT™) IS CALLED 
CSEE SECTION 9» THE MODE) FUNCTION) » CARRIAGE CONTROL. IS 
HANDLED. BY THE FUNCTIONS SPACEC) AND PAGE(C )+ WHICH ARE DESCRIBED 
IN SECTION 9. 


ZCP 12 
SYSPOT 1S AN ATTEMPT TO SIMULATE THE FIRST*CHARACTER CARRIAGE CONTROL 
OF 1BM, CDC, ETCs LINE PRINTERS. THE FIRST CHARACTER OF THE 
- QUTPUT IS DELETED AND TRANSLATED INTO THE APPROPRIATE CALLS OF 
SPACEC) ANO PAGEC)3 THE REST OF THE STRING IS THEN PASSED To 
THE DUTPUT STRING» PRINT. THE CARRIAGE CONTROL CHARACTERS 
CURRENTLY RECOGNIZED ARE 


2878000, 
pe7Tg000 
2880000 
2881000 


cM OS ENGLE: SPACING 

co MOM OCZEROQ) DOUBLE. SPACING 
Ma" PAGE EJECT 

t*” WO SKIP AT END OF PAGE 

t+ NO SPACING@"QVERPRINTING 


2884000 
2885000 

2886000 

2887000 


tcp. pe 

PUNCH Ts OUTPUT TO THE CARD PUNCH. THE LOGICAL AND PHYSICAL 
RECORD SIZES ARE BOTH 80 CHARACTERS. PUNCH IS CLOSED aT THE 
START OF EXECUTION. 


Bop 2. ees 
TELETYPE. ‘TS AN 1/0 STRING ‘TO ALL ATTACHED TELETYPES, Treas 
DESCRIBED IN THE NEXT SECTION« 


%CP 12 
10,4. TELETYPES. 


TELETYPES ARE HANDLED SOMEWHAT DIFFERENTLY FROM THE NON*@INTERACTIVE 
I/O DEVICES, THERE IS NO "FILE" OF PRE*DEFINEN "RECORDS" WHEN 
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2942000. 
2943000 
2944000 THE SaMe TIMEs aT A GIVEN INSTANCEs THE PROGRAM CaN DO I/O WITH 

(2945000 ONLy ONE OF THEM, BUT THE ONE BEING TALKED TO CAN BE CHANGED By 


2948000. AND “SUSPENDO). 
2949000 — | 
2950000. eee 


2953000 104442, 


2902000 USING A TELETYPE. ALSQr TELETYPE I/O OPERATIONS» ESPECIALLY INPUT? 
2903000 CANT ALWAYS BE DONE IMMEDIATELY I1 IS OFTEN NECESSARY FOR THE 
2904000 PROGRAM TO WAIT» ESPECIALLY FOR INPUT. THE INTRINSIC FUNCTIONS 
2905000 THAT ARE USED WITH FILE I/O STRINGS WILL FAIL IF A TELETYPE I/O 
2906000 STRING IS GIVEN TO THEM» AND THERE ARE A FEW FUNCTIONS THAT ARE 
2907000 USED ONLY WITH TELETYPES. 


2908000 ‘THIS SECTION CAND yTS SUB™SECTIONS) GIVES A GENERAL PICTURE OF 


2909000 HOW I/N IS NONE ON TELETYPES,. 
2910000 


2911000 


2912000 
2913000 4cP 28 


2914000 10.4616 TELETYPE INPUT. AND OUTPUT. 


2915000. 
2916000 THERE IS A SINGLE I70 STRING USED WITH TELETYPESs IT IS CALLED 
2917000 “TELETYPE'’, WHEN TELETYPE [S USED AS AN INPUT STRINGs A STRING 


2918000 IS READ FROM A TELETYPEs THE INPUT IS GIVEN TO THE PROGRAM WHEN THE. 
(2919000 USER TYPES THE “END"OF*MESSAGE" CHARACTER» AN ARROWs “et, 


2920000 CTHE CTRL#=Q COMBINATION IS ALSO END#OF@MESSAGE,) IF NO INPUT 1s 
2921000 RECEIVED WITHIN THE WAITING TIME FOR TELETYPE I/Os THEN TELETYPE 
2922000 WILL FAILe 


2923000 | WHEN A PROGRAM ASSIGNS A VALUE TO TELETYPE» THE VALUE IS WRITTEN 


2924000 ON THE. TELETYPE. THE QGUTPUT OPERATION CAN FAIL IF» FOR SOME REASON» 


2925000. THE QUTPUT CANT BE INITIATED WITHIN THE WAITING TIME» OR IF THE 
2926000 USER PUSHES THE BREAK | KEY DURING OUTPUT, THE OUTPUT STARTS WHEREVER 


2927000 THE WRITE HEAD MAY HAPPEN TO BEs AND IF THE END OF THE LINE IS 
2928000 REACHED, OVERPRINTING WILL OCCUR» THE PROGRAM MUST INDICATE THE 


2929000 ee LONTROL” BY USING THE FOLLOWING CHARACTERS? 
2930000. 
2931000. a wen (SINGLE. QuoTE. ON THE TELETYPE) CAUSES A RETURN To. THE 


2932000 © FIRST CHARACTER POSITION OF THE CURRENT LINE. 
2933000 age CUP=ARROW ON THE TELETYPE) CAUSES THE PAPER TO ADVANCE 
2934000 ONE LINE CYLINE FEED"), 
2935000 


29396000... IT SHOULD BE NOTED THAT ASSIGNING A VALUE TO TELETYPE ONLY 


2937000 INTTTATES OUTPUT, AS SOON AS THE OUTPUT STARTS» THE OUTPUT 


2938000 ROUTINE RETURNS TQ THE PROGRAM AND EXECUTION CONTINUES+ SINCE | 
2939000 A TELETYPE 1S SUCH A SLOW QUTPUT DEVICE, THE PROGRAM CAN GET QUITE 


2940000 A LOT OF COMPUTING DONE BY THE TIME THE QUTPUT IS FINISHED. IT 
2941000 Is QUITE COMMON FOR A PROGRAM TO HAVE A SECOND OUTPUT STRING READY 
BY THE. ‘TIME. aA PREVIOUS OUTPUT IS FINISHED TYPING. 

THERE CANS BE. SEVERAL TELETYPES ATTACHED TO.A SNOBOL PROGRAM AT 


2946000 USING THE [NTRINSTC FUNCTION USER(). FOR OTHER FUNCTIONS RELEVANT 
2947000 TO TELETYPEs SEE THE DESCRIPTIONS OF STATUS()» WAITC)» RELEASEC)» 


2951000 
2952000. 4CP 7 


TELETYPE WAITING TIMES. 


AN QPERAT {ON ON A TELETYPE WILL FAIL IF 1T DOES NOT SUCCEED 


2956000 WITHIN ‘A FIXED PERIGD OF TIME CALLED THE "WAITING TIME", THIS TIME. 


2957000 LIMIT CAN BE SET BY USING THE =WAIT CONTROL CARD OR THE INTRINSIC 
2958000 FUNCTION WAITC). IF NEITHER 18 USED» A WAITING TIME OF 300 SECONDS 
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- 2939000 


2960000 
2961000 


el Fh2000 
2963000 
29564000. 
-2965000 - 


2966000 
2967000 


ao 9968000. 
~~ 2969000 
2970000 

2971000. 


2972000 
2973000 


2974000 


2977000 T 
2978000 
2979000 


3983000 


2984000 
2985000 


2990000 
2991000 
2710) ee 
2993000 Al | 


2994000 USIN 


2996000 
2997000 


we rae Pr cepa edhe. 


3903000 


_.. 3004000. OF co 


3099000 


3910000 - 
3011000 


3012000 
3013000 
3014000 
3015000 


(5 MINUTES) IS ASSUMED BY SNOBOL, 


BCP 40 2 ee 
10.4.3. TELETYPE ADURESSES, 

THIS SECTION IS UNLY OF INTEREST TO USERS WISHING TO USE 
SEVERAL TELETYPES AT THE SAME TIME. OTHER USERS SHOULD PROBABLY 


IGNORE me oe" 
SINCE. It 18 POSSIBLE FOR a PROGRAM TO BE COMMUNICATING WITH 


SEVERAL TELETYPESs AND ALL TELETYPE 1/0 IS DONE THROUGH THE ONE 
s/o. STRING» TELETYPEs THERE MUST BE A WAY TO DISTINGUISH BETWEEN 


THE INDIVIQUAL TELETYPESse THIS IS DONE By GIVING EACH TELETYPE 

AN ADDRESS, THE FUNCTION USER() CAN THEN BE USED TO SWYTCK BACK 
AND FORTH BETWEEN THE VARIQUS TELETYPES ATTACHED. 

F ADORESS CONSISTS OF A PAIR OF INTEGERS SEPARATED 

E FIRST INTEGER IS CALLED THE “TERMINAL UNIT” NUMBER? 
COND I§ CALLED THE "BUFFER ADDRESS" ¢THE USER NEED NOT 
REMEMBER THESE TERMS» SINCE THEY ARE RATHER WORTHLESS FOR MOST 
eee SOME POSSIBLE ADDRESSES» DEPENDING ON THE HARDWARE 
Ret 1/5", "1/15"s 3/7» "10/43". WO/O%, ETC, 
PROGRAM CAN ONLY COMMUNICATE WITH TELETYPES THAT ARE. 
ALE kN: TELETYPE: BECOMES ATTACHED TOA SNOBOL PROGRAM 


1) THE USER INITIATES THE Jo8 FROM A TELETYPE» WITH AN MCP 
ROL CARD STARTING: 

XECUTE SNOBOL/SNOBOL. 4+. 
ATTACHES HI§ TELETYPE TO A RUNNING JOB nT 
£ 46 FOLLOWING EQUIVALENT COMMANDS? 

“PPRUN SNOBOL/SNOBOL€ 

@?RUN SNOBOLe 


“FIND OUT WHICH TELETYPES» IF ANY» ARE ATTACHED BY. 

ATUSC) FUNCTION, (ANY OF THE TELETYPES GIVEN BY THIS. 

CAN BE USED AS AN 1/70 DEVICE BY CALLING USERCA)» WHERE 

E TELETYPE ADDRESS.» FOR EXAMPLE, IF IT IS KNOWN THaT A 

TELETYPE WITH THE ADDRESS "41/5" IS ATTACHEDs I70 CAN BE DONE ON 
I E Lb Ou.ING. MANNER! 


PEE erm MESSAGE "s4m 
“ANSWER = TELETYPE /F (ND « RESPONSE) 


Es IF THERE IS ONLY ONE TELETYPE ATTACHED CAS IS ALMOST 
HE CASE)* THERE IS NO NEED TO WORRY ABOUT WHICH ONE IT ‘IS 
L TERED IES 170 WILL BE WITH THAT ONE TELETYPE « 


a 3 9 0 Bt 0 900. gnltsscendanee Bier ah slants Gace aan ea 


SCP AO 
10«4e4. SPECIAL CHARACTERS FOR THE TELETYPE. 
THE CHARACTERS LISTED BELOW REQUIRE SPECIAL ATTENTION WHEN USED 


WITH TELETYPE I/O. SOME ARE INTERPRETED AS CONTROL CHARACTERS BY 
THE HARDWARE» ANO OTHERS ARE PRINTED DIFFERENTLY ON THE LINE PRINTER 
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3916000 


3017000 
3018000 


3019000 


3020000 
3021000 


3023000 
3024000 
3025000 


3026000 
3027000 
3028000 


3029000 
3030000 


3035000 


3036000 


cen 8937000 
9038000... 
(9039000 
BO8Q000 0: 


3041000 
3042000 


3048000 
3049000 


3050000 
3951000 


3954000 
3055000 


3060000 
3061000 


~ 3062000" 

: 3063000 
3064000. | 

3065000 


3066000 


BORO oon 
3066000 | 
3069000. 
“BO TO000. 
3071000 


30720900 


THAN ON THE TELETYPE. 


PRINTER TELETYPE 


Hett We tt 


3022000 


ng* APO STROPHE 


omg UPARROW | 
>" EXCLAMATION 


wet we 


owes 943000 
3044000. 
3049000. 
3046000: 
3047000 


catty 


"Backs SLASH. 


“DESCRIPTION 


"GROUP MARK"s OR “END@OF*MESSAGE"™ CHARACTER, 
THIS CAN NOT BE READ OR WRITTENe THE 

CTRL™@ COMBINATION IS THE SAME CHARACTER» 
BUT DOESNT PRINT. 


THIS CAN BE INPUT» BUT WHEN GUTPUTs IT 
CAUSES A "CARRIAGE RETURN"@"THE WRITE 

HEAD RETURNS. TO COLUMN 1» AND NO CHAR 

IS PRINTED. 


THIS CAN ALSQ BE INPUTs BUT WHEN OUTPUTs 


IT CAUSES THE PaPER TO ADVANCE BY ONE LINE, 


WHEN TYPEDs THIS CAUSES ERASURE OF THE 
THE CURRENT “BUFFERS WHEN OyTPUT» IT 
CAUSES A DISCONNECT, 


AS IGNORED ON OUTPUTS WHEN TYPED, IT 


SOMETIMES CAUSES ERASURE OF THE PREVIQUS 
CHARACTER TYPEDs AND SOMETIMES ACTS - 
LIKE A "e", THE RULES THAT SAY WHICH 
WILL OCCUR ARE TOO COMPLICATED TO BE 

OF ANY PRACTICAL USE, 


NORMAL EXCEPT FOR. THE DIFFERENT CHARACTER 
USED ON THE TELETYPE, MOST TELETYPES ~ 
ALSO DONT INDICATE THAT THIS CHARACTER 

IS TYPED BY USING SHIFT= Ls 


NOTE THAT "C" AND "J" ARE ON THE TELETYPE (SHIFT=J AND SHIFT=M)3 


ACP 50 


— ae 5+ CAUSES OF I/0y 
3050000 
3057000 
3058000 ¢ 
3059000 


HERE IN DETAIL? 


INPUT O¢cURS WHEN? 


THEN AUST. ARENT ANDECATED ON THE KEYS OF MOST. TELETYPES, 


To EFFECTIVELY. USE SNOBOL 1/ae IT IS NECESSARY TO KNOW WHAT 
“CoNsTRUCTS. CAUSE INPUT OR OUTPUT TO OCCUR. THESE ARE DESCRIBED 


1) aN INPUT STRING IS USED AS A STRING REFERENCE IN RULES © 


OF THE FORMS? 


 eSTR” REF> 


<STR REF> <PATTERN> 


CARD FCB) 


JSSIR REF >. <PATTERN>  <REPLACEMENT> 


INPUT occurs. IMMEDIATELY AFTER THE STRING REF ERENCE. 1s 
EVALUATED, THUS IN THE RULES 


/FCL3) 


A127 


eo *® @ ® 
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3073000 
3074000 
3075000 
3070000 


93077000" 
3078000 


3079000 
3080000 
3081000 


... 39082000. 
3083000. 
3084000 | 
3085000 > 


3086000 
3087000 


3092000 
3093000 


_ 3094000 
~~ 3095000. 
3096000. 
~s 3097000...-.- 


3098000 
3099000 


we 3190000 
9102000. =. 
3103000 


3194000 
3195000 
3106000 


3407000 
3106000 
3109000. 


3110000 
3111000 


24 SLE 009: 
31143000. 
ay yaooo 

8115000: 


3116000 
3117000 


3122000 
3123000 


3124000 


3125000 
3176000 
3127000 
3128000 
3129000 


THE LNPUT OCCURS BEFORE FCB) IS CALLED. 
2) AN EXPRESSION USES THE VALUE OF AN INPUT STRING: INPUT 
PEGA S WHEN Une NAME IS ENCOUNTERED. THUS IN THE RULES 


§TR F (READ eTVALOMLM)) 
THE INPUT OCCURS BEFORE ALC™i") IS CALLED, 
OUTPUT OCCURS WHEN? 
4) AN OUTPUT STRING IS USED AS A STRING REFERENCE IN RULES 
OF THE FORMS! 


“<STR REF> <REPLACEMENT> 
<STR REF> <PATTERN> <REPLACEMENT> 


3088000. 
3089000 
3090000 
3091000 _ 


“OUTPUT OCCURS IMMEDIATELY AFTER THE REPLACEMENT IS. DONE. 
ar EXAMPLE». TO. Done A LINE TO THE PRINTER? 


“PRINT = "CRD = ™ QUOTE CRD QUOTE 
BOTH INPUT AND OUTPUT WILL OCCUR IF THE STRING REFERENCE Is 


ROTH AN INPUT STRING AND AN OUTPUT STRING. 
2) a STRING VARIABLE HaS AN GUTPUT STRING FOR ITS NAME» AND 


THE PATTERN MATCH SYCCEEDSe ouTPyT OCCURS WHEN THE ASSIGNMENT 


TO THAT VARIABLE IS MADE, 
3) A FUNCTION IS CALLED» ANO AN OUTPUT STRING IS EITHER THE 
STRING NAMED THE SAME AS THE FUNCTION» A FORMAL PARAMETERS 
OR A LOCAL VARIABLE. OUTPUT OCCURS AT BOTH THE CALL ANDO 
THE RETURN OF THE FUNCTION. 


SECTION AL 
APAGE J 0 
11. DERUGGING AIDS+ 


THERE ARE CURRENTLY TWO TYPES OF DEBUGGING AIDS PROVIDED IN 
B5500 SNOBUL3+ THERE TS A TRACING FACILITY THAT CAN BE USED TO 
MAKE A RECORD OF VALUES ASSIGNED TO VARIABLES» CALLS OF FUNCTIONS» 
AND TRANSFERS TO LABELSe THERE IS ALSO AN INTERACTIVE DEBUGGING 
TOOL THAT ALLOWS a USER AT a TELETYPE TO SUSPEND A PROGRAM». ASK | 
QUESTIONS ABOUT ITS STATE» CORRECT ERRORS MADE BY THE PROGRAM, 

AND RESUME EXECUTION, 


(3118000 | 
3119000. 
- 3120000 | 

3421000. 


ZCP_ a. 
List, TRACING. 


_ TRACING IS PROVIDED IN g5500 SNOBOL FOR STRINGS» FUNCTIONS» aNp 
LABELS. OuyrPuT FROM TRACING GOES 7O THE LINE PRINTER FILE» PRINTe 
THE FUNCTIONS THAT CONTROL TRACING ARE? 


SCP 21 


NOTE. THAT IN RULES OF THE FORM <STR REF> <PATTERN> <REPLACEMENT> 
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3130000 TRACESCS19S29S3reee) TURNS ON TRACING FOR THE STRINGS NAMED BY 


3131000 St» S2e S3s ETC. THIS MEANS THAT WHENEVER a VALUE IS aSSIGNED 
3132000 TO ONE OF THESE STRINGS» QUTPUT OCCURS GIVING THE STATEMENT 
3133000 NUMBER» THE STRING NAME» AND ITS VALUE» IN THE FORME 

3134000 oo see ee 

3135000 *S <STMT#> <NAME> = " <VALUED> " 

3136000 7 


3137000 FOR EXAMPLEs TO TURN ON TRACING FOR ALPHAs XV2s AND QvARy CALL? 
3138000 


3139000 ss TRACE SC ALPHAs "XV2"s "QVAR") 


34140000 S 
3441000: IF THE vARTABLE ALPHA WERE ASSIGNED THE VALUE "THIS ONE” IN 


3142000 = STATMENT 135% THE FOLLOWING WOULQ Bre PRINTEN: 


3143000 

3144000 *§ 135 ALPHA = "THIS ONE" 

3145000 es 

3146000. STRING ‘TRACING 15 CONSIDERED AN OUTPUT USE OF. THE STRING» AND | 
3147000 “TURNING ON TRACING WILL TERMINATE ANY PREVIQUS I70_ USE THE STRING 


31489000 MAY HAVE HAD, TRACING OUTPUT OCCURS AT ALL PLACES WHERE OUTPUT 


3149000 DeCcURS FOR STRINGS WITH QGUTPUT USE@"THAT Is, WHEREVER A VALUE 
31590000 IS ASSIGNED. 


_. 3151000. 


3452000 9), 


3153000 %CP 27 : : | ? 
3154000 TRACEF(F1,F2sF3,+.+) TURNS ON TRACING FOR THE FUNCTION NAMED BY 


3155000 F4e Foe F3e ETCe WHEN ANY OF THESE FUNCTIONS IS CALLEDs OUTPUT 


3156000 QCCURS GIVING THE FUNCTION NAME» THE STATEMENT NUMBER» AND THE 
3157000 VALUES, ‘OF THE PARAMETERS» IN THE FORM? 

3158000 0 

3159000 . ot <STMTE> <Fer NAME> ( <PARAMS>. ) 

3160000 3 

“3161000 WHEN. THE FUNCTION RETURNS» MORE QyTPyT OCCyRS (STARTING WITH 

3162000 eR" RATHER THAN "#C™) GIVING THE RETURN VALUE OR INDICATING 
poh 3000 a FALLURE « FOR EXAMPLES SUPPOSE A PROGRAM HAD CALLED? 

3164000 oe 

3165000 : TRACER ("BL OCK", "TIME", "FLXGQ™) 

“3160000 6 

3167000 THIS WILL “ST ART TRacING FOR THE FUNCTIONS BLOCK()» TIMEC)» AND 


3148000 FLXGQC). SUPPOSE THAT STATEMENT 93 JHEN CALLS BLOCK(CA>"3%)» AND 


3169000 = A = ™ITONS AND THE. a RETURNED IS "X43" THEN THE FOLLOWING 


170000. DUTPUT WILL: OCCURE 


_ ane 


“Bigeoss +O. “98 BLOCKCNITON, Mam) 

3173000 *R 93 BLUCK() = "XxX,3" 

3174000 

eget ee BLOCK HAD FATLEDs THE LAST LINE WOULD HAVE BEEN? 
3176000... 

817700000. aR 93, BLOCK() FAILED. 

3178000. 

3179000 NOTE “THaT “TRACING CAN BE USED wITH BOTH S YSTEM*DEFINED AND 
31890000 PROGRAM=DEFITNED FUNCTIONS, 


Pd ch 10S ee ne ee een eR 


3183000 cP 1300Cttt—tw Sas sce _ , 2 | 
3184000. TRACELCLLpL2eL3n 000) INITIATES TRACING FOR THE LABELS CONTAINED 
3185000 IN Lis Loe Lae ETC. THIS MEANS THAT WHENEVER ANY OF THESE LaBELS 


3186000 Is ENCOUNTEREDs UyTPUT OCCURS GIVING THE LABEL,» THE NUMBER OF 
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3196000 


3187000 


3188000 
3189000 


3190000 
33191000... 
3492000. 

3193000 . 


3194000 
3195000 


3499000 


32060000 
3201000 


“3206000” 
3207000 


“3212000—~SOS 


3213000 


"3218000 


3219000 


ck tas 
3225000 


9229000. 
3230000 


3231000 
3232000 


“3236000 
3237000 


3238000 


3239000 
3240000 
3241000 


TIMES IT HAS BEEN EXECUTED CINCLUDING THE CURRENT ONE)» AND 


THE NUMBER OF THE PREVIQUS INSTRUCTION. THUSs IF A PROGRAM 
HAD CALLED: 


— TRACELCMBACK™> "NONE". "B41", "BO" ) 


THEN IF STATEMENT 216 TRANSFERS TO BACK» WHICH HAS PREVIQUSLY 


BEEN EXECUTED 17 TIMES» THE FOLLOWING WILL BE PRINTED: 


_.*L. BACK 18 FROM 216 


DETACH(N»T) CAN BE USED TO TURN OFF TRACINGe THE NAME OF THE 


OBJECT CONCERNED IS CONTAINED IN NS T GIVES THE TYPE AS FOLLOWS 


EANS THAT N CONTAINS A STRING NAME, 
ANS THAT N CONTAINS A FUNCTION NAME« 
EANS THAT N CONTAINS A LABEL. 


ONL ooM 


ONLY THE FIRST CHARACTERS OF T IS LOOKED ATs IF T IS NULL» "S" 
1S..ASSUMEDes . THUSs TO TURN OFF TRACING FOR THE STRING NAMED ALPHA» 
THE COULD eg ANY OF: ee oe oe es 


ET PHAN) 
DETACHC"ALPHA"S mgr 
DETACHCTALPHA*s"STRING") 
NETACHCUALPHA™s"SLORKLE™) 


ZPAGE 
1162, INTERACTIVE DEBUGGING. 


VE DEBUGGING AIO HAS BEEN IMPLEMENTED FOR USE WITH 
SICALLYs» IT CONSISTS OF SUSPENDING A PROGRAM AND 
ERPRETER QUESTIONS ABOUT ITS STATEs IF ERRORS HAVE 


BEEN ‘MADE » OALLES OF STRINGS CAN BE CHANGED» AND THE PROGRAM CAN 
BE RE*INITIATED EITHER WHERE IT WAS SUSPENDED OR AT ANY OTHER 


BE SUSPENDED, AND. THE DEBUGGING ROUTINE. ANTI TATED: 
OLLOWING METHODS? ~ 


THE PROGRAM “CAN. CALL “SUSPEND( "WITH NULL PARAMETER, 
TF 4 =DEBUG CARD OCCYRRED DURING COMPILATION, SUSPENSION 
WILL OCCUR JUST BEFORE THE FIRST INSTRUCTION STARTS, 
N OCCURS WHEN THE PROGRAM IS RUNNING IN "DEBUG" | 
I: PROGRAM ENCOUNTERS A LIMIT. SET DURING A PREVIOUS, 


vee aU NS TON 
4) THE PROGRAM COMMITS ANY OF “THE VARIOUS PROGRAM ERRORS THAT 


ARE NORMALLY FATAL.» THESE ARE ERRORS SUCH AS CALLING UNDEFINED 
FUNCTIONS» TRYING TO EXECUTE A STATEMENT WITH A SYNTAX ERROR» 
“TRANSFERRING TO AN UNDEFINED LABEL» ETCe 


A PROGRAM RUNS EITHER IN NORMAL ("RUN") MODE OR IN “DEBUG” MODE. 


3242000 "DEBUG" MODE CAUSES CHECKING FOR A NUMBER OF PROGRAM CONDITIONS 
3243000 WHOSE OCCURENCE WILL CAUSE THE PROGRAM TO BE SUSPENDED. FOR A 
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3248000. 
3249000 
(3250000. 


3244000 


3245000 
3246000 
3247000 .. 


3251009 
3252000 


3253000 7 
3254000 


3255000 


3257000 
3258000 


LIST OF THE LIMITS THAT CAN BE SET BY THE PROGRAMMER? SEE THE "RUN" 


COMMAND BELGWe A PROGRAM CAN BE IN DEBYG MODE FOR ANY QF THE 
FOLLOWING REASONS? 


12) THE PROGRAM CONTAINED A “DEBUG CONTROL CARD. 
2) THE PROGRAM WAS SUSPENDED EARLIER, 
3) THE PROGRAM HAS CALLED MODEC("DEBUG"). 


DEBUG MODE IS TURNED OFF BY CALLING MODEC™"RUN"), IF THIS IS DONE, 
THE ONLY WAY TQ GET BACK TO THE DEBUGGING ROUTINE IS FOR THE PROGRAM 
TO CALL SUSPEND) OR MODEC"DEBUG")» SINCE MODECRUN") TURNS. OFF ALL 


3255000 THE LIMIT CHECKING ASSOCIATED WITH DEBUG MODE. 
3256000 
AND IS THEN WAITING FOR a COMMAND. THE COMMANDS THAT HAVE BEEN 


WHEN A OGRAM Is SUSPENDED» THE SYSTEM TYPES OUT "SUSPENDED". 


IMPLEMENTED AS OF THIS WRITING ARES 


3252000... 


00 . SCP. 23 


3262000. 


3263000 
3264000 


3263000... 
3266000 0 


ee TIE 


3300000 


"3565000 


TYPE. “eNAMES 


THIS CAUSES THE VALUE ‘OF THE VARIABLE <NAME> TO BE TYPED IN 
THE FOLLOWING FORME 


<NAMED BM <VALUE> " 


3267000 

aehscse ae THE PROGRAM DOESNT CONTAIN <NAME>» AND IT HASNT BEEN CREATED” 
3269000 By INDIREGTION, THE RESPONSE IS! 
3270000 


SNAME > NOT IN oe 


3272000 | : 

3273000 In ER. To. ALLOW THE USER TO USE ANY STRING NAME. THAT Can 
3274000 «=o BE ENTERED FROM A TELETYPEs THE FOLLOWING CONVENTION Is MADES 
3275000 THERE IS EXACTLY ONE BLANK AFTER "TYPE"; THE REST OF THE INPUT 
3276000 STRING ITS THE <NAME>. THUS ANY CHARACTER READABLE FROM A 
3277000 TELETYPE CAN BE USED IN «NAME>» INCLUDING BLANKS» FOR EXAMPLES 
(3278000 THE COMMAND? : . 
3279000. cae 

3280000 =sTYPE +AA/3 Bie 

3281000 

3282000 MIGHT GET THE RESPONSES 

3283000 _ 


- eAAdS Bl = "437 ASB a" 


9266000 0 ee 

3287000 

32e8000 &CP 49 

3289000 SET EE rec _ a 

3290000 <VALUE><« a : 
3291000 ~~ THIS COMMAND» REQUIRING TWO INPUT STRINGS» ASSIGNS THE STRING 

3292000  <VALUE> 18 <NAME>. THE FIRST INPUT» SET <NAME>*s PRODUCES 

3293000 A RETURN/LINE FEED FROM SNOBOL» AND IT IS THEN WAITING FOR THE 

3294000 <VALUE>» THE CONVENTIONS FOR <NAME> ARE THE SAME AS FOR THE 
ogee re hy COMA) 8 FOR EXAMPLE» THE THREE COMMANDS? 

3296000... oe oe oe ; Lae. 

3297000 — SET AB3« 

3298000 ee oN 47,727, Cle 

3299000 TYPE AB3¢ 


e 


| 
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t 
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3301000 


3302000 
3303000 
3304000 


339300677" 
3306000 | 
- 3397000 


3308000 
3309000 
331.0000 


3311000. 


3312000 


3313000 — 
3314000 


3315000 


3320000 
3321000 


3322000 

3323000 

3324000 
_ 3325000. 


3376000 
3377000 


3331000 


3332000 
3333000 


_,, 3334000. 

3335000 

3336000 — 
3337000 


3338000 
3339000 
3340000 


3344000 
3345000 


3346000 

3347000. 
3348000 _ 
3349000 © 
3350000] 


3351000 


_ 3352000 


3353000 
3354000 
3355000 
3356000 
3357000 


3310000. 

Bairooe 

3218000. 
3319000. 


WILL GET THE RESPONSE? - 


AB3 = "N47,727,C1" 
BECAUSE TRANSMISSION ERRORS DO OCCUR FAIRLY OFTEN WITH TELETYPES» 
IT IS ADVISABLE TO FOLLOW SET COMMANDS WITH TYPE COMMANDS TO 
VERTIFY THAT THE CORRECT VALUE HAS BEEN ASSIGNED. 
%OP. 9 
LABEL <LABEL>S 


THIS: COMMAND “SIMPLY TELLS THE “USER HOW MANY TIMES THE LABEL HAS 
BEEN EXECUTED SO FAR» IF THE LABEL ISNT DEFINED» THE RESPONSE 
WILL BES 


- <LABEL? NOT DEFINED 


ULE: WITH THE TYPE AND SET COMMANDS» THERE IS EXACTLY ONE BLANK 
BETWEEN "LABEL™ AND <LABEL>» 


zr ay 
RUN <INTEGER> FROM <LABEL> TO <LABEL> <LABEL> <LABEL> eee6 


ie COMPLICATED COMMAND RE*INITIATES EXECUTIONs ANO ALSO SETS 
UP THE CONDITIONS THAT ARE TO CAUSE SUSPENSION LATER. ALL OF 


3328000. THE COMMAND AFTER "RUN" Is OPTIONAL, AND BREAKS DOWN INTO SEVERAL 


‘TONSs THAT ARE REALLY PARAMETERS, 
CINTEGER> Is USED» THEN THE PROGRAM WILL BE SUSPENDED 


“FIER IT EXECUTES <INTEGER> INSTRUCTIONS*» IF IT MANAGES TO 
GET THAT FAR AT ALL 


Ip FROM <LABEL> IS USED» THE CURRENT INSTRUCTION WILL BE 
TERMINATED CAS IF IT HAD FAILED)» AND EXECUTION WILL RESUME AT 


‘THE STATEMENT LABELED <LABEL>+ IF <LABEL> ISNT DEFINED» THE 
RESPONSE KILL BE? 


EL ABEL> NOT DEFINED 


cop AND. THE PROGRAM WILL REMAIN SUSPENDEDs 
oe 3 341000 . : a 

3342000 — 
3343000. 


“TO <LABEL> <LABEL> +e« PART IS INCLUDED» IT IS 


“UNTeRPAE ES AS A LIST OF LABELS THAT ARE TO CAUSE SUSPENSION IF 
“THE PROGRAM TRIES TO EXECUTE THEMe NOTE THAT THE LABELS ARE 


SEPARATED BY BLANKS#"ANY OTHER DELIMITERS CSUCH AS COMMAS) WILL 
BE INTERPRETED AS PART OF A LABELe IF A LABEL IS USED THAT 


ISNT DEFINED, THE "NUT DEFINED" RESPONSE WILL BE GIVEN» AND 
THE PROGRAM WILL REMAIN SUSPENDED.» THERE IS A LIMIT Tg. THE 
“NUMBER OF LABELS THAT CAN BE GIVEN. THIS LIMIT IS CURRENTLY 
SET TO 16s THOUGH IT MAY BE INCREASED IN THE FUTURE IF THERE 


1S DEMAND FOR MORE. IF TOO MANY LABELS ARE GIVENs THE RE SPONSE 
WILL Be "TOG MANY LABELS» AND THE PROGRAM WILL REMAIN SUSPENDED. 


AS A SPECIAL CASE» IF "Ta" IS USED WITHOUT ANY LABELS FOLLOWING 


IT» THE LIMITS WILL BE THE SAME AS THOSE USED THE LAST TIME CIF 


ANY). 
SOME EXAMPLES OF RUN COMMANDS ARE? 


RUN 


aeneveesesoevseeusnsennvn0ne08600 


T412- 


hag 
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e 


% 
7s 
L 


3499000 


3358000 
3359000 
3360000 


3361000 


3362000 
3363000 


3364000 


3345000 
3366000 


RUN 75e¢ 

RUN FROM HNT3 TO HNTS HNT8¢ 

RUN 40 FRUM GIN,7¢ 

RUN 500 FROM A3 TO B1 AA1 APPLY3 ERROR EQY ALTRY« 
RUN FROM FORRL TOe« 

RUN 1000 Tde 

RUN le 

RUN FROM STARTe 


3367000 


3368000 
3369000. 
_ 3370000 


3371000 
3372000 


3377000 
3378000 


_,. 3379000 

3380000... 
3381000 
3382000. 


3383000 
3384000 


3385000 
3386000... 
3387000 

3388000 2 
3389000 


3390000 


eee ee _ 
3392000 — 
3393000. 


3394000 


3396000 


3397000 


3401000 
34902000 
3403000 


34904000. 
3405000 
3406000. 


3497000 
3408000 


3411000 _ 


ENDe. 


| a3e9000 
3400000 | 


ZCcP 3 


THIS CAUSES THE PROGRAM TO TERMINATE NORMALLY. 


3373000 _. 
3374000. 
3375000 
3376000, 


RCP 2 7 
ABORT« Se 
THIS CAUSES ABNORMAL TERMINATION OF THE PROGRAN. 


ACP 7 

WHY e: ; 

THIS CAUSES THE REASONCS) FOR SUSPENSION TO BE TYPED. SOME 
POSSIBLE RESPONSES TO THIS ARES 


RULE LIMIT HIT 
LABEL LIMIT HIT 
SUSPEND() CALLED 
FATAL ERROR 


CPA 


3394000 WHEREe 
3395000 


THIs CAUgES THE SY SteM TO TYPE Out WHERE THE PROGRAM WAS SUSPENDED 
(STATEMENT NUMBER AND LAST LABEL) ANp HOW MANY RULES HAVE BEEN 
EXECUTED SO FARe 


BPAGE 1 
pk eek ies 


ZOP 6 


THE. FOLL OWING CHARACTERS HAVE SPECIAL MEANING IN. COLUMN 15 


"9" MCP CONTROL CARD 
mm SNOSOL CONTROL CARD 
met CO TINUATION CARD CINVALID FROM ZTELE TYPE? 


ongn “COMMENT CARD. 


3413000 
3414000 


. 
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8» 6 


ps 3u15000 xcP 3 


3416000 A LABEL IS ANY NON*NULL STRING PRECEDING THE FIRST BLANK ON A CARDe 
3417000 THE FIRST CHARACTER CAN BE ANY EXCEPT THOSE LISTED ABOVE$ THE REST 
cree oe 3418000 OF THE LABEL CAN USE ANY CHARACTERS BUT BLANKS, 
34190007.) fe. oe 
3420000 
oe BARLQO0 oe 
3422000 %cP 4 
3423000 WHEN ENTERING A PROGRAM FROM A TELETYPE» ANY INPUT ENDING WITH 
se SE ou 3424000 "Hr WILL BE TREATED AS AN ERROR*@*THE COMPILER WILL DISCARD IT 
- 3425000 TYP! UMTRY AGAIN" » AND ASK FOR MORE INPUTe 
342600 
Se el 
3428000 
3429000 
ely r can If * /” 15 
Beare: THE NEXT. CHARACTER MUST BE EITHER CH A gh 
COLON ("8") CAN Be SURROUNDED BY ANY NUMBER OF BLANKSe 
Lee 34 O INCLUDING NONE, ANU CAN STAND ALONE WITH GO GO-TO PART FOLLOWING 
3434000 It» IN WHICH CASE IT IS IGNORED. 


3439000 TO SEPARATE TERN. OR STRING REFERENCE. FROM a MEPLACEMENTS EITHER 
3440000 "=" GR "e" CAN BE USEDs THE COMPILER THINKS THEY ARE EQUIVALENTe 
3441000 


~ 3445000. ILLEGA CHABAC TERNS "2", CANT BE READ FROM A CARD READER EXCEPT 
3446000 IN COLUMN 1, IN WHICH CASE IT INDICATES AN MCP CONTROL CARD. ANY 
3447000 CARD CONTAINING "2" ANYWHERE ELSE WILL BE THROWN OUT BY THE CARD 
3448000, READER, THE JOB WILL USUALLY NOT BE RUNe THIS CHARACTER CANT 
BE A TELETYPE» EITHER» SINCE ANY INPUT CONTAINING "9" 
RPRETED AS A MESSAGE TO THE MCP, THERE IS NO PROBLEM 
Aw?" UN THE LINE PRINTER OR ON A TELETYPE. 


3452000 
34353000 


STR natch B5590 SNOBOL3 INITIALIZES TO HAVE 


every 
3459000 QUOTE CONTAINS A QUOTE 
R 


3463000. : 

3464000 SINCE NEITHER CAN BE INPUT FROM A TELETYPE. 

3465000 
a ee ee aE rete .2 5°10 10 a ane nee ee es 
ne 3467000 
3468000 CP 2 
3469000 THE SYSTEM LIMIT ON STRING SIZE IS 8181 CHARACTERS. ATTEMPTING TO 
3470000 CREATE A STRING LONGER THAN THIS WILL CAUSE ABNORMAL TERMINATION, 
3471000 


00 T E STRINGS” MARK. “AND” ARROW ARE. PROVIDED. MAINLY. FOR TELETYPE. USERS? 


rr er er ee 2 Sr 2 2 2 2 er. 
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- 3512000 MEANS. THE SAME, Ast. 
Soyscee age 
3544000. 2 Le AON Ges mot /8¢(L) 


3524000 IS DEFINED BYt 


3472000. 

3473000 

3474000 “cP 9 

3475000 THE CONCATENATE OPERATOR IS A BLANK, BLANKS ARE USUALLY OPTIONAL, 
3476000 WITH. THE FOLLOWING EXCEPTIONS: | : a 

3477000 

3478000 1): BEFORE. THE STRING REFERENCE. 


“3479000 2) BETWEEN TWO IDENTIFIERS. 


3480000 3) BETWEEN AN IDENTIFIER AND A FOLLOWING nem, TO DISTINGUISH 
3481000. . .A CONCATENATION OF A STRING AND A GROUPING FROM A FUNCTION 
3482000 ——s« CALL: «CWHICH HAS NO BLANK). © 

3483000 4) BEFORE A "/" USED AS A GOTO DELIMITERs« 

3485000 

3486000 


3487000 cP 4... 

3488000 ANY STRING CAN BE USED AS A STRING NAME, INCLUDING THE NULL STRINGs 
_ 3489000 IN PARTICULAR? THE ‘FOLLOWING 1S A VALID EXPRESSION? 
3490000. | 


3491000 ; Sue 7 
3492000 


wpe ROO. ses secoyee mien 
3494000. 
3495000 3cP. s 
3496000 IF a GheTp “PART HaS BOTH A SUCCESS ANDO A FAILURE EXIT, THEN THE "Ss" 


3497000 OR "FY CAN BE OMITTED FROM THE SECOND PART, THUS? 
3498000 


3499000. /SCAI(B) |. MEANS /SCADFCB) 
3500000 . —TFCXAYCX7) | MEANS SF CX A)SCX7) 

AS01000 = ee 
SSOZ000 


3503000 | 
3504000 %cP 11 ; 
3505000 SEVERAL STATEMENTS CAN BE PUT ON ONE CARD. THEY ARE SEPARATED BY 


3506000 SEMTCOLONS ("3"), CONTINUATION CARDS CAN BE USED AS USUAL. OF — 
3507000 COURSE» SINCE A LABEL MUST START IN COLUMN t+ ONLY THE FIRST STATEMENT 
3508000 ON A CARD CAN BE LABELED. FOR EXAMPLE, 

~ 3509000 ~ 


3510000 L A Meo" = Me" /SCLIF B= A Me" B /(LOOP) 
3511000 


é #9 
3515000 BS A)" B /(LOOP) 
3516000 

ae gohan 
3518000 — ; 


3519000 %CP 15. 


3520000 NO INTERNAL DISTINCTION TS MADE BETWEEN FORMAL PARAMETERS AND LOCAL 


3521000 VARIABLES OF PROGRAM*DEFINED FUNCTIONS. IF A FUNCTION IS CALLED WITH 


3522000 MORE aCTUAL PARaMETERS THaN THERE aRE FORMAL PARAMETERS» THE EXTRA 
3523000 PARAMETERS ATLL BE ASSIGNED TO upeee VARIABLES. FOR EXAMPLE, IF FO) 


3525000 


Ee eee sores 


3527000 
3528000 THEN IF THE PROGRAM CALLS FC™+"s"e%e"x")s THE VALUES AT THE ENTRY 
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@ 


| J 
Sd 


ana 


4 


3529000 POINT» 


3530000 
3531000 


3532000 
3533000. 
-3534000_ 


3535000 
3536000 
3537000 


tr ptt 
tf wa ft 
He 
ne we 


Une 


A 
B 
C.: 
D 


3538000 4APPENDIX A 
8539000 PAGE 1. 
3540000 APPENDIX he 


Fie WILL BES 


BNF NEF INITIONS FOR SNOBOL3, 


-BS541000.. SPEEA, 
3542000 <UNSTRUCT ION> ; 
3543000 ; 

3544000  <LABELED INST>  $¢! 
3545000. = <UNLABELED INST? 

BON 0000 | INST ee + 

“B547000.- 0-0 6- : 
3548000 H 
3549000 <RULEO : 
3550000 _ ; 

(35810005. 3 

O5S2000 0 : 
3553000 <STR REF> ; 
3554000 <PATTERN> ; 
3555000 : 

steed OO Tt OG, teats nate Oh Sacensie A : 
pre FBS 7000 eon 
©) FBlbbos <aeruacewent> cee § 

3599000 <RPL DELIMITER? 
3560000 ; 
3561000 <EXPRESSIGN> : 

3562000 Se ee ert et ; 

3868000 : 

3564000 <ELEMENT> ou : 

BS69000 000 Cee eee i 
3566000 <NAMED EXPR> : 
3567000 ; 

3568000 | <VALUE EXPR> = 3 

98690000) 8 ee 3 
3570000. — 3 
oP SRPLO00 (el : 
3572000 <CONCATENATE OP> 
3573000 <IDENTIFIER?> 

.. 3374000 
3576000... 

“BS7 1000 ce 
3578000 

3579000 <LITERAL> 
3580000 | <GROUPING? 
3581000 <FCT CALL? H 
3582000 <FCT NAME> H 
3583000 <PARAMS> ‘ 
3584000 i 
3585000 <ARITH EXPR?> ; 


a ee ee ee) er ee ee) 


ae ef ef S82 as #8 


ho OG Wo BOM Nab tO OM ee He ao ae Ao Roa HH OP wea ato ab th of abe Hoo 


a 


a 


<LABELED INST> 

<UNLABELED INST> 

<LABEL> <UNLABELED INST> 
<BLANKS> <INST> 

<RULEO 

<GO"TO FART> 

<RULE> <GO=TO PART> 

<STR REF> 

<STR REF> <PATTERN> 

<STR REF> <REPLACEMENT> 
<STR REF> <PATTERN> <REPLACEMENT> 
<ELEMENT 
<ELEMENT? 

<STR VAR> 

<PATTERN> <PATTERN> 


<PATTERN> <BACK. REF > 
<RPL DELIMITER> <EXPRESSION> 


€ 


<ELEMENT? 
<EXPRESSION> <CONCATENATE OP> <ELEMENT? 


 SEMPTY> 


<NAMED EXPR> 
<VALUE EXPR> 
<IDENTIF IER> 
$  <ELEMENT> 
<LITERAL> 


— <GROUPINGS 
- SFCT CALL> 


<AR-ITH EXPR> 
<BLANKS> 

<LETTER> 
<IDENTIFIER><LETTER? 
<DIGIT> 
<IDENTIFIER><DIGIT> 


2 

<IDENTIFIER> 4, 

" <STRING> Lid 

( -<EXPRESSION> ) 

<FCT NAME>C <PARAMS> ) 
<IDENTIFIER> 

<EXPRESSTION> 

<PARAMS> = » <EXPRESSION> 
<A*TERM> 


@eeee® e | ee e0«eoe 0080808800806 06h6hM8UC~«MMhC<“ HC HH CB 
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3638000 XPAGeE 1 
3639000. APPENOIX Be BNF “NOTATION, 

3640000 | ee : 
3641000 “FoR “THOSE “NOT “FAMILIAR WITH "BNF" (CBACKUS*=NAUR FORM OR 
3642000 BACKUS NORMAL FORM)» A BRIEF DESCRIPTION FOLLOWS. BNF IS A 


€ “ ® “ 
A 3586000 tte  "  <A™TERM> 
: 3587000 <A™TERM> tts  <A"TERM> <ADD AP> <M*TERM> 
@ 3588000 $8  <M=TERM> 
= 3589000 _<MeTeRM> 335 <M"TERM> <MUL OP> <E*TERM> 
3590000 ; tis <E*TERM> 
€ 3591000 <E=TERM> tis <E"TERM> <EXP OP>  «<ARITH ELT> 
3592000 oe $$=  <ARITH ELT> 
3593000 <ARTTH ELT> t$=  <NAMED EXPR> 
€ 3594000 $t= <GROUPING> 
setae 3595000 $32 <FCT CALL> 
35960000. a $$=  <LITERAL? 
€ 3597000. <ADD OP> t3= + 
3599000 <MUL OP> tis o* 
6 3600000 tts x 
Pees Fe: 3601000 ee tts / 
: 3602000...  <EXP- OP>. “fhm ee 
€ — 3603000 <PATTERN> | t8=  <ELEMENT> 
. : | “9608000 ee Se itm <STR VAR> 
3605000 #t=  <PATTERN? <PATTERN> 
} 3606000 $$=  <PATTERN> <BACK REF> 
ete (3607000  <STR VAR> tts <ARB VAR> 
: 3608000. Cees ?f= <BAL VAR> 
¢ 3609000 ee t= <FIXED"LENGTH VAR> 
Wie ees 8620000 2 Oe ARBD VARD ths ks 
3611000 i$=  o* <NAMED EXPR> + 
¢ 3612000 <BAL VAR> $= KC) 
oar eats, 3643000 its o*C <NAMED EXPR> )* 
3614000... <FIXED"LENGTH VAR> 222 0 «/° <EXPRESSION> * . 
oe 36150000 ts oo ®  <NAMED EXPR> / . <EXPRESSION> * 
[oe 3616000 <BACK REFD> oe PERO ENAMED EXPR> 
3617000 <GO*7TO PART> :3= <GO=TO BDELIMITER> <GO-TOS> 
¢e 3618000 <GO"TO DELIMITER> t2= <pBlLaNKS> / 
ete eae 13-8 7.0) ©) See eee aE tte 3 
3620000.  <gO0"TOS> $= <UNCONDITIJONAL GO=TO> 
a 3621000  - ee ee ee <SUCCESS: GO=TQ> 
ene a 39622000 ee tte <FAILURE GO#TO> 
3623000 t= <SUCCESS GomTO> <FAILURE Go™TO> 
e 3624000 st= <FAILURE GO*TO> <SUCCESS GO"TO> 
us 3625000 <UNCONDITIONaL GU"TO> $= ( <LABEL EXPR> ) 
. 3626000 <SUCCESS GO-TO> i:= SC <LABEL EXPR> ? 
eo 3627000 — <FAILURE GO@TO> tts FC -<LABEL EXPR> ) 
L 36268000 = <LABEL EXPR> - $3=  <RESERVED LABEL> 
3629000 tts <LABEL> 
@ 3630000 tt=  <COMPUTED LABEL> 
covnecmawicnesiuinennus nn o93190900  <RESERVED LABEL> $= END 
699632000... 92 AE OORETURN 
@ (3633000. its FRETURN 
POLE ane 3634000.” 
3635000 
e 3636000 
6 
| 
e 
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3643000 SOMEWHAT STANDARDIZED METHOD OF PRECISELY NOTATING SYNTACTIC 
3644000 DEFINITIONS OF CERTAIN TYPES. 
3645000 QUANTITIES WHICH MUST APPEAR AS A CERTAIN STRING OF CHARACTERS 
3646000 ARE REPRESENTED BY THAT STRING OF CHARACTERS.» VARIABLE STRINGS - 
3647000 ARE GIVEN A NAME» WHICH IS SURROUNDED BY "BNF BRACKETS» "<" 
3648000 AND wo", FOR EXAMPLE» THE MCP CONTROL CARD? 
 FOM90N0 ery 
3650000 2NATA <NAME> 
3651000 
_.3652000 MUST CONTAIN THE LITERAL STRING "?DATA" FOLLOWED BY A <NAME>» 
3653000 WHICH MUST. oa DEFINED ELSEWHERE» SOME EXAMPLES OF CARDS THAT 


ee 3654000 SATISE 

Lo ses80000 
3656000 PDATA. “ALPHA. 
3657000 PDATA XXZZYY 
3658000... 


1000. a VARIABLE. LTE. WAY BE DEFINED BY USING a "BNF EQUATION” TO. 
3662000 DEFINE IT IN TERMS OF OTHER ITEMSe A DEFINITION IS OF THE FORM? 
3663000 

te 3664000. san NAME Root Le SDEFINITION? 


OR EXAMPLE? & UNCTION. CALL MAY BE DEFINED BY 


“3648000 a <FCT. Ls oe <FCT NAME>( <PARAMS> ) 


3669000 
3670000 CT NAME> AND <PaRAMS> ARE DEFINED BY OTHER EQUATIONS, 
JER AL. ALTERNATE DEFINITIONS OF AN OBJECT» SEVERAL ~ 

IVEN+ IF A VARIABLE HAS SEVERAL DEFINITIONS» THEN 
3673000 THAT VARIABLE HaS ALTERNATE. ‘DEFINITIONS, ANY OF WHICH CAN 
~ 3674000 APPLY IN A GIVEN INSTANCE, THIS WAYs RECURSIVE DEFINITIONS ARE 

3675000 SIMPLE (AND QUITE COMMON), FOR EXAMPLE? 
- 3676000 


tbe > <EXPRESSTON> | 
t= <PARAMS> +  <EXPRESSION> 


~36A0000. THIs MEANS THAT <PARAMS> CAN BE A SINGLE EXPRESSION» OR IT CAN 
3681000 BE ANY NUMBER OF EXPRESSIONS SEPARATED BY COMMASe WHEN SEVERAL 
. 3682000 CONSECUTIVE DEFINITIONS ARE GIyEN FOR THE SAME yARIABLE, IT Is 
RA (TO MAKE READING EASIER) TO OMIT THE LEFT*HAND - 
TION IN ALL BUT THE FIRST, So THE. ABOVE DEFINITION 


Ft aeons. ie 
3687000 <PARAMS> 23 <EXPRESSION? 
mace Sc seats _<PAR RAMS> » <EXPRESSTON> | 


369100 THAT. A FEW LTEMS ARENT DEF INED="IN PARTICULAR» <BLANKS> AND 
3692000 <EMPTY> ARE CONS]DERED TOO OBVJOUS TO BOTHER DEFINING. IT IS 
3693000 RATHER COMMON FOR SOME TERMS TO BE DEFINED BY ENGLISH#=LANGUAGE 

3694000 DEFINITIONS» WHEN BNF IS UNSUITED FOR THE JOB. THIS IS DONE FOR 
3695000 A FEW SYMBOLS IN THE SNOBOL3 DEFINITIONS™"SEE THE APPROPRIATE 
3696000 SECTION OF THE MANUAL FOR THEIR DEFINITIONS. 

3697000 
3698000 
3699000 


KAMPLES OF BNF “DEFINITIONSs SEE. THE PREVIOUS. APPENDIX» 


@®eeeeeeeeeesr»nkeeeeeese#eee @® @® @® @ @4 
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3716000 © 
J STL C000 | 


3700000 
3701000 
3702000 
8293000, 
3704000 
3795000 


3700000 


3707000 
3708000 


3709000 
3710000. 
3711000. 

3712000 


3713000 
3714000 


3753000 
3754000 _ 


3749000 
3720000 


7 3721000 | 
3722000 | 
3723000 
3724000... 


3725000 
37246000 


3727000 | 


3729000 
3730000 
3731000 


3732000 
3733000 


3734000 | 


3738000 


3736000 
"3737000 


3738000 
3739000 


3740000 
3741000 - 
3742000 — 
3743000 


3744000 


bea oe 


3747000. 

3748000 
3749000 
3750000 


3755000 
3756000 


3715000 


ZAPPENDIX C_- 


‘PAGE 1 
APPENDIX C. 85500 CHARACTER SET. 


2] 
mM 
aire 


CHAR” 0 CT NEC PUNCH COMMENTS 


bios 


i 


Oo NA Ue Ww nD 
OoCw@WnernsrunHeo 


AB a Boa ? . 
: “8 OR ANY TLLEGAL PUNCH 


SUN SWORN ONe wo 


17 15 7-8 TELETYPE? DISCONNECT 


TON GOD tNVewebomVousunnos 
ory 
st 
z 
pars 
fas 


TELETYPE? END*OF MESSAGE 
TELETYPE! BACKWARD SLASH 


AUND IAM Vd eA wo VO Z EC ROK TAR we 


TELETYPES APOSTROPHEs CARRIAGE RETURN. 
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3757000. U 64. 82. OR4 
3758000 v 65 53 O05 
3759000 WwW 66 54 096 
ee 3760000 xX 467. 55 0-7 
“8T41L000 OY OOF Os BB 0r8 
3762000. 2 74 5% 0-9 
3763000, 72. 58 (0-3-8 
3764000 % 73 42499 Omang . 
3765000 4 74 60 Om2°8 TELETYPE? UP"ARROWs LINE FEED 
ees 766000 8 75 61, O85"8 
3767000 1. 76. 62). On68 
3768000..." 77. 63°. «OMT R8 
ee ETO 9000 vee Se 
3770009 %APPENDIX 0 
3771000 %PAGE 1 
- 3272000 APPENDIX OD. RUNNING JOBS FROM A TELETYPE. 
3774000 THIS APPENDIX IS INTENDED TO DESCRIBE THE SOMEWHAT INTRICATE 
Ce 3775000 METHGOS OF RUNNING A PROGRAM CIN PARTICULAR» A SNOBOL PROGRAM) FROM 
3776000 A TELETYPE» AND HOPEFULLY TO SOMEWHAT AMELIORATE THE INITIAL SHOCK 
3777000 OF TRYING TO USE THIS RATHER PRIMITIVE AND FRUSTRATING INTERACTIVE 
oo» 3778000 I70 DEVICE. THIS DESCRIPTION IS FAR FROM COMPLETE» AND DUE TO THE 
3779000 CONSTANT REVISION CAND OCCASIONALLY IMPROVEMENT) OF THE MCP» DETAILS 
3780000 CAN BE EXPECTED TO CHANGE aT ANY TIME» USUALLY WITHOUT WARNING, THE 
ae 3781000 NOVICE IS WARNED THAT THE MCP WAS DESIGNED FOR THE USE OF PEOPLE wHO 
3782000 ARE VERY FaMILIaR WITH ITs aNp DOES VERY LITTLE TO HELP THOSE WHO DONT 
3783000 KNOW HOW IT BEHAVES. 
ew 3784000 | THE FIRST THING NECESSARY 1S TO "LOG IN"s THAT IS* TO TELL THE MCP 
-. 3785000 WHO YOU ARE. THIS IS DONE BY TYPING? : 
oO STB6000 o 
BL BTO00 ALD eh Demeoe 
3788000 
3739000 AT THE UNIVERSITY OF WISCONSIN» <I.D-e> IS THE USER AND PROVECT 
Liss _... 3799000 NUMBERS» IN THE FORM? 
ee STOM000 ee 
; 3792000. €1aDy> 5 <USERH> / > <PROJ#> 
lg 
3794000 THE MCP WILL RESPOND TO THE LOG=IN MESSAGE WITH SOME SORT OF ACKNOWLED] 
3795000 GEMENTs AND THE USER CAN THEN TNOTCATE WHAT PROGRAM HE WANTS TO RUN 
3796000 BY TYPING A @?EXECUTE CONTROL CARD»- THIS MESSAGE CONTAINS THE SAME 
3797000 INFORMATION AS THE MCP CONTROL CARDS DESCRIBED IN SECTION 264» WITH 
3798000 THE FOLLOWING CHANGES: 
. CS BEIIOOO eee! ss 
3890000 1) ALL CONTROL caRDS MUST BE SENT TOGETHER AS ONE MESSAGE. THIS 
3801000 MESSAGE CAN BE LONGER THAN ONE LINE» SINCE THE RETURN AND LINE@FEED 
igor lite _ 3802000 KEYS ON THE TELETYPE DO NOT TRANSMIT ANYTHING. 
— 3803000 2) THE FIRST CONTROL CARD Ig THE EXECUTE CARD» WHICH Is PRECEDED 
3804000 BY TWO "2"=S. ALL OTHER CONTROL CARDS ARE PRECEDED By "3" 
ee 3805000 = RATHER THAN "?%. THE USER CARD IS NOT USED, SINCE THAT INFORMA™ 
3806000 TION WAS GIVEN IN THE LOG*IN MESSAGE, 
3897000 3) THE FILE PROGRAM NEEO NOT BE ASSIGNED» SINCE THE TELETYPE IS THE 
ee 3898000 INPUT DEVICE FOR THE COMPILER.» 
REG EbOG ROR Ree ee 
3810000 #cP 9 
3811000 SOME EXAMPLES OF EXECUTE MESSAGES ARE? 
3412000 
3613000 P2EXECUTE SNOBOL/SNOBULe 
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3815000 22EXECUTE SNOBOL/SNOBOLZPROCESS#5310=103 

3816000 FILE CARD=BLEEK/GRUNK SERIAL« 

3847000 7 

3818000 PPEXECUTE SNOBOL/SNOBOL sCORE=190003PROCESS=20; 10*30¢ 

3819000 ee 2 

3820000. 2 

3821000 %CP 21 

3822000 WHEN THE EXECUTE MESSAGE {S TYPEDs THE MCP WILL RESPOND IN ONE OF 

3823000 TWh WAYS. IF THERE IS ROOM FOR THE PROGRAMs THE RESPONSE WILL BE? 

3824000 ee se oie : 

3825000 — ~TISNOBOL/SNOBULSI BO) <TIME> 

PIB2600008 ue ei ey. of 

3827000 If THERe IS NOT ENOUGH ROOMs WHICH 1S MUCH MORE LIKELY THE RESPONSE 

3828000 WILL BE OF THE FORM? 

. 3829000... 
— 3p30000.°. i:  SNOBOL/SNOBOL = J SCHEDULED <TIME> 
3831000 . 
THe USER MUST. THEN FIND SOMETHING ELSE TO OCCUPY HIS TIME UNTIL SPACE 
3833000 BECOMES AVAILABLE AND THE “BOg" MESSAGE IS TYPED BY THE MCP. USERS ARE 
3834000 ADVISED TO BRING SOMETHING TO READ WHEN ATTEMPTING TO RUN DURING 
3835000 BUSY PARTS OF THE DAY, 

3836000 WHEN THE BOJ MESSAGE APPEARS» THE COMPILER IS RUNNING AND WAITING 

3837000 FOR INPUTe THE USER CAN THEORETICALLY TYPE ANYTHING THAT IS VALID 
3838000 PROGRAM MATERIAL EXCEPT FOR CONTINUATION CARDS. IN PRACTICEs USERS 

3839000 ARE ADVISED To FIRST GET THEIR PROGRAM IN A DISK FILE CTHERE ARE 

3840000 SEVERAL EDITING PROGRAMS ARQUNDs AS WELL AS A PROGRAM TO COPY CARD 

3841000 DECKS To DISK FILES)» AND NOT ATTEMPT TO TYPE THE PROGRAM ITSELF 

Sbieeed ieee To THE. COUTALERS 

3843000 

3844000 3cP_ 21. | : be, 
"3845000 WHEN A AatG RAM "CARD" IS TYPED» THE COMPILER WILL COMPILE IT AND 

3846000 THEN RESPOND WITH A RETURN/LINE FEED» AND THE USER CAN THEN TYPE 

3847000 THE NEXT LINEe ONE EXCEPTION TO THIS IS THAT WHEN a *COMPILE CONTROL 

3848000 Cagd IS TYPEDs THE COMPILER TYPES OUT A NUMBER EVERY TENTH INSTRUCTION 

3849000 AS IT COMPILES» AND AT. THE END TYPES A MESSAGE SAYING IT IS DONE» THIS 

3850000 WAY THE USER CAy TELL HOW FAST THE COMPILER IS RUNNING* AND IF IT IS 

3851000 VERY SLOW» HE CAN PO SOMETHING ELSE (LIKE GET A CUP OF COFFEE) WHILE | 

3852000 HE WAITS FOR IT TO FINISH. 

_ 3853000 Us abh te THE. Roane WILL TYPE IN A SERIES OF SNOBOL CONTROL CARDS 
9854000 TH _ 6 BE LOApEp OR cOMPILED FROM ONE OR. 

3855000 MOF Me TILES, “AND. THEN INITIATE EXECUTION By TYPING AN END CARD. 

3856000 AS. SOON AS THE. END CARD Is TYPEOs THE COMPILER TRANSFERS TO THE | 

“3857000 INTERPRETER» AND THE PROGRAM IS RUNNING, SEE SECTION 10¢4 FOR METHODS 

3858000 OF DOING I/0 WITH A TELETYPE, 

38659000 IF aA MISTAKE IS MADE AND DISCOVERED BEFORE IT IS TRANSMITTED To 
886 Q000 THE comer THE WHOLE THING CAN BE ERASED AND RETYPED By TYPING. 
38461000 “Her, £ COMPILER WILL RESPOND WITH "TRY AGAIN» AND THE CARD 

3862000 CAN THEN BE TYPED OVER. THIS USUALLY WORKS BETTER THAN TRYING TO 

3863000 USE THE TELETYPES RATHER AWKWARD CAND NOT ALWAYS SUCCESSFUL). METHODS 

3864000 FOR ERASING MISTAKES. 

3865000 | _ . . 

3866000 %cP. 25. 
3867000. | SOME EXAMPLES. oF INPUTS TO THE “COMPILER ARE? 
BRO8000 ee 
3869000 
3870000 
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pc ee 3874000 LESTE: 

| 3872000 *LOAD MRG/GROUP 
3873000 “COMPILE SLIB/DIFFe 

_.. 3874000 "LIMIT RULES TO 3000¢ 

3875000 ENO INITe 

3877000. | 

3878000 

3879000 *LISTe 
3880000 "SIZE 3706 | 
3881000 “COMPILE. MARK/SINTe 
3B ) “LIST Se: 

3883000 =COMPILE. MARK/INT1¢ 
3884900 “COMPILE MARK/DIF 36 
3885000 *DEBUGEe 
OO. ENQe 
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3891000 *COMPILE GEO/TRAV3¢ 
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: 3923000. RA alleto 
3924000 ENTRY POINTS 


3925000 FUNCTIONSe a etel( DEFINE) p9C DEFINE Do 3e2el 
3926000 PROGRAM. .03e2930U 
3927000 FAILURE. «8 


}$ 3897000 
e@ os MALI", PNM) « 
01: oe TRACI CR CTHINT'» "REF" ) ae ; t(BEGIN)€ 
3902000 END INIT¢ 
@ 3903000 
3904000 
e o 
- 3207000 joa 
3908000 SPAGE 1 
@ 3909000 INDEX. 
-INCOMPLETE3 USERS ARE CORDIALLY INVITED TO SUBMIT. 
eo ONS: AS TO neay SHOULD BE ADDED: ies me 
~ 3914000 | 
@ 3915000 ARTTHMETIC.a05e4 
ALES nT eRe 00. BAC ERENCE ING S228 93. 
® = sois008, were. 
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OF PATTERNS «44546 
OF RULES «ee4 
OF TAD oo e190 10.5910 e4o 
OF FUNCTIONS 
INTRINSICS e009 
DEFINED sas36 2 


FUNCTIONS | 


ARITHMET [Cee od e4e 309 

CALLS ONi va 5 53 

DEFINED. .o3e22003 

INTRINSIC e009 
ANCHOR) 60060 499 

DEFINE) 000922520" DEFINE) 2342230264 
TRACINGs oellel 

INDIRECTION« 6050103 
IN. GO*TO | PARTscaTs 4 


: oo 944000 INPUT..,SEE N70" 
7 he 
5 me 3946000 FAILURE. e010. As 18, 1 
ie 3947000 FLiCSae ets 1,10. 2210.3 
ie 3948000 TELETYPES eee} 004 
a ee 3949000 LABELS e0Z23 O+3.1. (SEE ALSO "ENTRY POINTS") 
7 8950000. . IN GO-TO. PARTS eae7e2. 
: 3951000 — COMPUTED. ee764. 
ces (3952000 RESERVED se7.3 | 
3953000 OUTPUT,, SEE “I/0" 
3954000 PATTERNS e028 
erent ee 3955000 ANCHORED re 4 
3956000 FAILURE +48 ris 4. 3, 4s 56,6 
ee 39538000 “MATCHING s +4. Aas 
3959000 STRING VARIABLES «++ 602266 5 
3960000 ARBITRARY oe ebe2alaBe 6 
ee 3961000 ASSIGNMENT Ten 06s52606 
ee 3962000 = BALANCED. .+6.26226,.6 
3963000 = FIXED*LENGTHs + 26-243 
ee : 3964000 | NAMES. OF ee eSs Qo 
3965000 QUTPUT aSSOCIATEO WiTHe oes 5,10.5 
3966000 
Bo eet oe een ate 3967009 
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